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REVISTA INDEPENDIENTE PARA USUARIOS DE ORDENADORES AMSTRAD - 


Don Quijote 
cabalga de nu 


· La única forma de llegar al final 
de esta videoaventura conversacional, 
explicada paso a paso 
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Análisis a fondo y todas las instrucciones 
. 
para su montale 
I LOS SECRETOS DE LA MULTITAREA 
Reloj 
para CPC 
. 
con cinco 
alarmas 
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El scroll de pantalla 
más veloz 
Los gráficos de alta 
resolución en un PCW 
ya son posibles 
¡en Basic! 
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Descubrimos todos los misterios 
del inspector Gadget, 
y te lo presentamos uno a uno 
para que puedas enfrentarte 
B tu enemigo Max. 
Si eres gadgeto,inteligente. 
estamos seguros que 
aprovecharás la oportunidad que 
te presentamos. 
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E l ZBO dispone de una potente posibilidad que es la de man,!jar 
interrupciones, el Amstrad CPC poseedor de este microprocesador. 
puede también utilizarlas y producir efectos que recuerdan la 
multitarea, Para explicar cómo funciona esta extraña cualidad hemos 
escogido como ejemplo la implementación de un relo)
 con cinco 
alarmas programables, 
Dentro del mundo algo más profesional, que siempre supone el PC, 
ha pasado por nuestra redacción un disco duro con una excelente 
capacidad, 20 Megas, y unas muy buenas prestaclOnes, Analizamos a 
fondo este periférico, y además, por si usted es una manitas, le 
proponemos todas las instrucciones para su montaje. 


. 


6 Utilidades: Reloj por 
interrupciones. 


f 


12 Serie Oro, 
15 Consultorio, 
16 Código Máquina. 
19 Libros, 
PCW' 
22 Mundo del PCW, 
Gráficos para 


28 Juegos, 
36 Catálogo de Software. 
Musical. 
38 Concurso 
40 Mercado Común. 


44 lnfobytes. 
48 Mundo del pC. 



Si la memoria de su 
ordenador se le queda corta, la 
firma PahlData le ofrece la 
posibilidad de ampliar la con su 
tarjeta multifunción Krotel, 
850905 la cual está destinada a 
los IBM PC/XT y, como dice 
en su folleto de presentación, a 
sus verdaderamente compatibles. 
La tarjeta utiliza un solo slot de 
conexión, y aporta al equipo: 


- Ampliación de memoria. 
Permite añadir al 
ordenador desde 64- hasta 
385 K a voluntad del usuario. 
Para ello, PahlData 
tiene kit s de ampliación 
de esta cantidad de 
memoria, por lo 
que el cliente 
podrá 
disponer de la cantidad justa, 
o más aproximada que 
requiera, hasta las 384- K 
finales, 
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Krotel 850905 
Amplíe la memnria de 
PC o compatible 


La ampliación de memoria 
posee chequeo de errores, y 
junto con la memoria de la 
unidad central del ordenador se 
alcanzan las 64-0 K, Ésta es la 
máxima memoria que el sistema 
reserva para aplicaciones de 
usuano, 


- Dos puertos de 
comunicación RS-232, Ambos 
son accesibles desde el panel 
posterior del ordenador, una vez 
instalada la tarjeta. Son 
totalmente compatibles con el 
Adaptador de Comunicaciones 
Asíncronas de IBM en sus dos 
posibles configuraciones (COM1 
y COM2 respectivamente), y 
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HA EMPEZADO 
LA DISTRIBUCiÓN 
DEL Z88 


. Por fin, tres meses después 
de ser anunciado, ha 
empezado la distribución del 
ordenador portátil %88 de Sir 
CUve Sinclair. 
I Sinclair comunicó que el 
reparto empezó el sábado 
pasado y que la entrega de 
. edidos .stará 01 día dentro 
. e dos semanas. Esta 
. ecloroción podría significar 
. ve lo larga espero de los 
lientes que encargaron el 
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por tanto, pueden utilizarse con 
cualquier programa de 
comunicaciones estándar, 
diseñado para usar con modens, 
impresoras serie, plotters, etc. 
- Reloj tiempo-real. El 
reloj tiempo real provisto de 
batería de níquel-cadrr1io tiene 
permanentemente actualizadas 
hora y f
cha, aunque el 
ordenador esté apagado. 
El programa Clokpahl, 
incluido en el disquete que se 
suministra con el equipo, 
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%88, bien a través lo Which 
Computer Show, o bien a 
través del eiemplor de marzo 
de algunos revistas, está a 
punto de terminar. 
El %88 no ha logrado 
mantener los fechas de 
distribución organizadas, y Sir 
Clive Sinclair ha explicada que 
la gran variedad de problemas 
que se le han presentado ha 
oscilado desde errores en el 
software o demoras en la 
aprobación oficiol del módem. 
Este asunto del %88 le ha 
costado. tanto a Sir Clive, 
personalmente, como a su 
compañia, Cambridge 
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permite al inicializar el equipo 
(Power On o Ctrl-Alt.Del) carga 
la fecha y hora actualizadas en 
el sistema, para posteriores usos 
de éste. 
J unto a estas funciones 
hardware se ofrecen eón la 
tarjeta el siguiente software: 
- Clokpahl. Sirve para 
utilizar el rejol mencionado 
anteriormente. Visualiza la hora 
y la fecha del reloj, sincroniza el 
sistema con él, y posibilita, si 
fuera necesario, el cambio de 
hora y fecha. 
- Rampahl. Su función 
consiste en emular a las 
unidades de disco RAM. Éstas 
pueden ser definidas por el 
usuario. Según sus diseñadores, 
aumenta la velocidad de 
ejecución de todos los 
programas que utilizan 
frecuentemente las unidades de 
disco, 
- Spahl. Software de spool 
de impresora. Su utilización 
elimina tiempos de espera, y 
permite definir el tamaño del 
buffer de memoria de la 
Impresora. 
Para más imformación, 
dirigirse a: PahlData, S.A. 
CI Salcedo, 7, 28034- Madrid, 
Te!.: 729 37 22 
Télex 4-894-1 PAHL-E 
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Computers, una considerable 
cantidad de duras críticas de 
todo el pais, por lo que no se 
puede decir que el genio Sinclair 
haya vuelto con buen pie al 
mundo de la microinformática. 


RUMORES SOBRE 
UNA NUEVA VERSiÓN 
DE PCW 
Locomotive Software ha 
deiado bien claro que 
Locoscript 2, la nueva 
versión del procesoclor de 
textos que en lo actualidad 
sole 01 mercado ¡unto a los 
A..strad PCW8256 y 
8512, no acompañará a 
ninguno de estos dos 
ordeno. . . es cNcir, que 
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Seguridad para los discos duros 


El Drive TD-440-E es el 
nuevo producto que acaba de 
lanzar al mercado 3M España, 
empresa subsidiaria de la 
multinacional estadounidense 
3M Company, la misma de la 
cinta en cartucho Data 
Cartridge o Cinta Streamer. 
El TD-440-E es un sistema en 
el que se unen en una misma 
unidad física, las funciones de 
un back-up para disco duro, 
con los máximos adelantos en 
este tipo de sistemas de 
seguridad, y la posibilidad de 
grabar en una cinta de hasta 4-0 
Mb, de manera que la cinta 
puede utilizarse como una copia 


seguirán facilitando la versión 
antigua, 
Esta declaración ha 
despertado especulaciones en 
torno a que A.slrad está 
planteando sustituir en otoño 
tos PCW82S6 y tos 8S 12 
por una nueva versión 
meiorada, rumor que se ha 
acrecentado gracias a las 
declaraciones de un portavoz 
de A...trad, quien ha 
manifestado que: «Locoscrlpt 
1 se seguirá vendiendo con 
todos los ordenadores PCW, a 
menos que se lance un nuevo 
ordenador». 
Locoscrlpt 2, cuyo 
lanzamiento tuvo lugar 
algunas semanas atrás, será 


lO ' 


de seguridad del disco duro de 
4-0 Mb o en dos de 20 Mb, 
La configuración de este 
nuevo aparato de 3M incluye 
un cable de conexión, una 
tarjeta de expansión, una puerta 
de diskettes y el software, que 
ha sido desarrollado por ADIC, 
con los manuales de utilización, 
Su precio, según fuentes de 3M 
España, depende un poco de 
cada uno de los comerciantes, 
pero estará alrededor de las 
230,000 pesetas, 
Para más información pueden 
dirigirse a 3M España, S, A" 
calle Josefa Val cárcel , 31, 28027 
Madrid, Tel. 74-2 00 12, 


Distribution y tendrá un precio 
de 20 libras. 


LAS CONSOLAS SEGA 
YA ESTÁN A LA VENTA 


las consola
 de videoiuegos 
Sega se encuentran a la venta 
en Gran Bretaña desde hace 
algunas semanas. A pesar de 
que la presentación oficial de 
estas consolas no está prevista 
hasta el próximo PCW Show 
d. septiembre, Mastertronic 
-distribuidora en .xclusiva d. 
Sego- ha suministrado a fas 
tiendas una buena cantidad d. 
estos ordenadores, así como 
de todo el software que hasto 
ahora se encuentra disponible 
. ara ellos. 


Entrega 
de los premios 
del Concurso 
Arkanoid 
a su ganador 


El pasado día 10 de julio se 
hizo entrega, en El Corte Inglés 
de la calle Preciados, de los 
premios del concurso de ámbito 
nacional basado en el célebre 
juego Arkanoid, El ganador, 
Carlos Cerdá de Paz, de 21 
años de edad y residente en 
Madrid, lo hizo con la versión 
para Amstrad del juego, y logró 
el muy importante marcador de 
1,04-9,000 puntos, A pesar de la 
considerable puntuación, ésta es 
sólo un indicativo del nivel de 
elite participante, ya que en las 
bases del concurso se indicaba 
que el ganador sería aquel que 
llegara a la fase, o pantalla, más 
alta del juego, Carlos logró 
llegar al finaL 
Preguntado a cerca de qué 
fase, o fases, le parecían más 
difíciles del juego, el destacado 
ganador nos contestó que «le 
habían parecido especialmente 
difíciles la 25 y 26», Lo curioso 
del asunto es que el afortunado 
ganador no quería concursar, y 
fueron sus familiares quienes 
hecharon la inscripción para 
poder participar 
Vayan desde aquí nuestras 
felicitaciones para Carlos, y que 
disfrute la máquina «de verdad» 
del Arkanoid, así como de los 
10 juegos y bolsa de deporte, 
camiseta incluida, cedidas por 
Erbe Software, 
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IOdos sabemos que nuestro A mstrad es capaz de generar interrupciones) 
pero por lo general no todos conocen su funcionamiento. En este artículo 
realizaremos una aproximación a este interesante asunto, utilizando un tema 
ya casi más tópico que clásico: la implementación de un reloj al que hemos 
incluido, como novedad, nada más y nada menos que cinco alarmas. 


Desde el momento en que encendemos 
nuestro Amstrad, el microprocesador empieza a 
ejecutar un programa escrito en lenguaje 
Máquina, contenido en la ROM, que es el que 
nos permite acceder al lenguaje Basic y, por lo 
tanto, trabajar con el ordenador. 
Además, el microprocesador se encarga de 
detener este programa principal a intervalos 
regulares, marcados por el reloj interno, para 
realizar una serie de tareas secundarias como 
pueden ser leer el teclado, controlar el sonido, 
manejar el parpadeo de los colores en la pantalla, 
etc. 
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A este proceso de interrumpir un programa 
principal, para ejecutar una rutina secundaria a 
intervalos regulares, se le denomina 
Interrupción, 
El programa principal puede ser tanto un 
programa realizado en Basic como uno en 
Código Máquina, La única diferencia entre 
ambos tipos es la elevada velocidad con que se 
ejecutan las interrupciones en Código Máquina, 
dándonos la sensación de que en realidad se están 
ejecutando varias tareas a la vez. 
Cuando se genera una interrupción, el proceso 
principal se abandona temporalmente, guardando 



A 111 wez que e;elufll.,os 
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disponemos de un re/o; Ion 
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todas sus variables, y se pasa a realizar las tareas 
secundarias. Cuando éstas hayan finalizado, se 
reanuda la ejecución de la tarea principal en el 
punto donde se había dejado, 
Desde el Basic se pueden generar 
interrupciones mediante los comandos Every o/y 
After, pero tienen el inconveniente de que sólo 
se ejecutan cuando corremos el programa, al 
contrario que desde el lenguaje Máquina, en el 
que a partir de que las activemos se estarán 
ejecutando hasta que realicemos la operación 
contraria. 
D n ejemplo muy claro de cómo funcionan las 
interrupciones es creando un reloj en la pantalla 
totalmente independiente del programa que resida 
en memoria; también se puede encontrar otro 
ejemplo en el programa publicado en esta misma 
revista, en el número 95, que servía para crear 
un buffer de impresora. 


Mundo del 
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Con este programa, además de disponer de un 
reloj tenemos acceso a cinco alarmas 
programables, 
El manejo es muy sencillo, gracias a la 
creación de una única RSX que controla todas 
las acciones del reloj. 
Para poner en marcha y en hora el reloj, basta 
con la orden: 


I RELOJ ,h,m 
en la que «h» es la hora del día, que debe estar 
comprendida entre 1 y 24, y «m» son los 
minutos, que estarán entre O y 59. Es muy 
importante que ambos parámetros se ajusten a 
estos valores, ya que la rutina no comprueba si 
los valores que se le dan son admisibles o no, Si 
al poner en funcionamiento el reloj nos hemos 
equivocado en algo, para corregido basta con 
volver a ejecutar la misma orden corrigiendo el 
valor erróneo, 
Desde este instante el reloj está funcionando, y 
para comprobado bastaría con ejecutar: 
I RELOJ 


PROGRAMA CARGADOR 


10 'AMSTRAD SEMANAL J.C.P. 
20 MEMORV &9FFF:n=&AOOO 
30 FOR i=l TO 39:FOR j=1 TO 10:READ 
a$:b=VAL(n&n+a$):sco=sco+b:POKE n, 
b: n=n+ 1: NEXT 
40 REAO s:IF s{)sco THEN PRINTn£RRO 
R 
n linea: n ji*10+50:STOP 
50 sco=O:NHT 
60 DATA 01,09,AO,21,14,AO,C3,Dl,BC, 
OE, 989 
70 DATA AO,C3,18,AO,52,45,4C,4F,CA, 
00, 1047 
80 DATA 00,OO,00,OO,FE,OO,28,59,FE, 
02, 639 
90 DATA 28,2F,FE,03,20,23,DD,7E,04, 
FE, 1016 
100 DATA 05,30,IC,5F,07,83,5F,16,OO 
,21, 464 
110 DATA 67,AI,19,OD,5E,02,73.3E,19 
,93, 955 
120 DATA 23,77,23,00,5E,OO,3E,3C,93 
,77, 892 
130 DATA C9,21,4F,Al,06,12.C3.BA.AO 
,21, 1072 
140 DATA 62,Al,CO,35,AO,23,36,3C,21 
,C2, 1053 
150 DATA AO,CD,EC,BC,21,C8,AO,11,CF 
,M, 1566 
160 OATA 06,81,CD,EF,BC,21,C2,AO,11 


,32, 1221 
170 DATA 00,OI.32,00,C3,E9,B(,06,01 
, :3it 732 
180 DATA 7B,Al,A8,32,7B,Al,CD,78,BB 


i 22 1 1332 
190 DATA 7C,Al,C9,CD,78,B8,E5,3£,07 
,CO, 1501 
200 DATA B4,BB,F5,2A,7C.Al.CD,75,BB 
,21, 1481 
210 DATA 63,Al,4£,3E,19,91,CO,37,Al 
,23. 102E. 
220 DATA 4£,3E,3C,91,CD,3A,Al,21,76 
,AL 1081 
230 DATA 06,05,F3,CD,BA,AO,FB,Fl,CD 
,B4, 1@2 
240 DATA BB.El,CD,75,BB,C9,7E,23,CD 
,5A, 1578 
250 DATA BB,10,F9,C9,OO,OO,OO.00,OO 
,OO. 653 
260 DATA 00,00,00.00,00,00,00,21,65 
,AL 295 
270 DATA 35,20,O£,36,3C,28,35,20,08 
,36, 403 
280 DATA 3C,2B,35,20,02,36,18,3A,7B 
,Al, 610 
290 DATA B7,C4,85,AO.3A,66,Al,B7,20 
,26, 1246 
300 DATA 06,OS,21,67.Al.7E,23,B7,20 
,05, 689 


310 DATA 23,23,10,F7,C9,3A,63,Al,BE 
,20, 1074 
?-20 DATA F5,23,3A,64.Al.BE,20,EF,2S 
,2B, 1146 
330 DATA 36,OO,3E,OI,32,66,AI,C3,06 
,00, 637 
340 DATA C5,OI,!0,7F,ED,49.3E,4B,ED 
,79, 114E. 
350 DATA 3E,17,CD,IE,8B.Cl,20,08,10 
,EC. 992 
360 DATA 3E,07,CD,5A,BB,C9,AF,32,66 
.AL 1240 
370 DATA C9,11,76,Al,06,FF,04,D6,OA 


ID2! liS€: 
3BO DATA 3C,Al,4F,3E,30,80,12,13,79 
, Cf. , f;94 
390 DATA 3A,12,13,13,C9,4F,72,64,65 
,6E. 819 
4ÚO DATA 20,69,6E,63,6F,72,72,65,63 
,74, 1001 
410 DATA 61,2E,OA,OD,OO,00,OO,OO,OO 
,00, 166 
420 DATA 00,00,00,00,00,00,00.00,00 
,00, O 
430 DATA 00,OO,00,OO,OO,00,3A,OO,OO 
,00, 58 
440 DATA 00,00,00,00,00,00,00,00,00 
,OO. ° 
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Así se gestionan 
las interrupciones 


Para crear una interrupción 
desde Código Máquina se 
pueden utilizar las 
facilidades que nos ofrece 
el sistema operativo del 
Amstrad. Lo primero que 
tenemos que hacer es crear 
la interrupción mediante la 
llamada: 
CALL &BCEF 
que necesita los siguientes 
parámetros en los registros: 
En HL hay una zona de 
siete bytes que sirven para 
la gestión interna de la 
interrupción. que contiene 
el tipo de interrupción así 
como una dirección de 
referencia. 
El B contiene la clase del 
suceso, este byte está 
compuesto por los 
siguientes parámetros: 
BIT O. Si vale cero quiere 
decir que pertenece a 
una ROM del sistema. Si 
vale uno, que la rutina 
se encuentra en la 
RAM. 
BIT 1,4. Estos tres bits 


sólo sirven para sucesos y 
son indiferentes para las 
interrupciones.. 
BIT 5. Siempre hay que 
ponerlo con valor cero. 
BIT 6. Para una 
interrupción urgente se 
pone a uno y si vale cero 
quiere decir que es normal. 
BIT 7. Si está a uno es 
una interrupción y si vale 
cero es un suceso. 
En C tenemos que poner 
el número de la ROM si la 
rutina está en ROM, en el 
caso de que esté en la RAM 
no es necesario dar ningún 
valor. 
El DE contiene la 
dirección de entrada de la 
interrupción que se va a 
ejecutar. 
Una vez que hemos 
creado la interrupción hay 
que avisar al sistema para 
que ejecute la rutina, esto 
se realiza mediante otra 
llamada: 
CALL &BCE9 


que necesita los siguiente 
parámetros: 
En HL la dirección de un 
almacenamiento de seis 
bytes para el trabajo 
interno de la rutina. 
El BC contiene la recarga 
de la cuenta; es decir, el 
tiempo en cincuentavos de 
segundo con la que se va a 
repetir la interrupción. 
En DE está la cuenta 
inicial, que al igual que en 
BC está en cincuentavos de 
segundo, y marca el tiempo 
que ha de transcurrir desde 
que hagamos la llamada 
hasta que se ejecute la 
interrupción por primera 
vez. 
Si deseamos que la 
interrupción no se vuelva a 
ejecutar tenemos que hacer 
la siguiente llamada: 
CALL &BCEC 
que necesita los siguientes 
parámetros: 
El HL debe contener la 
dirección del 


JP" 


PROGRAMA ENSAMBLADOR 
10 ¡RELOJ CON HQRAS y "INUTOS 260 lO E.A 510 CALL ENTRA 760 CALL IBBB' 
20 ¡Y CON CIIICO AIJR"AS 270 RLCA 520 INC Hl 770 PUSH PtF 
30' ¡J,C.P. 280 Aoo A.E 530 LO (HU ,60 780 LO Hl, (CUR) 
.0 ¡ 17-6-87 290 LO E.A 5.0 LO HL.ClO 790 CALL IBB75 
50 300 LO 0.0 550 CAlL IBCEC 800 LO Hl.HDR 
60 OR6 IAOOO 310 LO HL,OIR 560 LO HL. BLO B10 LO C,(HU 
70 ENT . 320 N!O HL,DE 570 LO DE. EVE 820 LO A.25 
80 LO BC,TAB 330 ENTRA: LO E.m+2) 580 LO B.129 830 SUB C 
90 LO HL,ESP 3.0 lO (HU .E 590 CALL IBCEF 8.0 cm RUT2 
100 JP ISCDI 350 LO A.25 600 LO HL.CLO 850 IIIC HL 
110 TAB: OEFW IIoN 360 SUB E 610 LO DE,50 860 LO C.(HU 
120 JP RELOJ 370 IIIC HL 620 lO SC.50 870 lO A.60 
130 IION: OEF" "RElO" 380 LO (HU ,A 630 JP IBCE9 880 SUB C 
140 OEFB "J"128.0 390 IIIC HL 640 890 CALl RUT 
150 ESP: OEFS . .00 lO E.(II) 650 IIOS: LO B,I 900 lO HL , "EN 
160 UD LO A.60 660 lO A.(VIS) 910 lO B.5 
170 RELOJ: CP O m SUB E 670 IOR B 920 DI 
180 JR Z.IIOS .30 LO (HU ,A 680 lO (VIS) . A 930 CALl BUCLE 
190 CP 2 UO RET 690 CAll 18878 9.0 El 
200 JR Z. HORA .50 700 LO (CUR) ,HL 950 POP AF 
210 CP 3 460 ERRI: LO HL. ERR 710 RET 960 CAll IBBS. 
220 JR NZ.ERRI m LO B,IB 720 970 POP HL 
230 lO A.m+.) .80 JP BUCLE 730 "OSTRA: CALL IBB78 980 CAll IBS7S 
2.0 CP 5 490 7.0 PUSH HL 990 RET 
250 JR NC.ERRI 500 HORA: LO HL.HOR-I 750 LO A.7 1000 
11 .4JISTRALJ .\; II/(II/(¡/ 



almacenamiento de seis 
bytes facilitados en la 
1'" rutina anterior. 
En cuanto se ha 
ejecutado esta orden, la 
interrupción ya no se 
vuelve a ejecutar más, a no 
ser que la activemos 
nuevamente. 
Cuando se ejecuta una 
interrupción, el sistema 
operativo se encarga de 
preservar todos los registros 
para poder continuar, 
cuando ésta finalice, con el 
programa principal. 
También hay que tener en 
cuenta que si una 
interrupción dura 
excesivamente, se puede 
acumular más trabajo que 
el que puede realizar el 
microprocesador, y se 
puede producir una pérdida 
del control de la máquina. 
Hay que destacar que 
mientras se usa el disco o el 
cassette el servicio de 
interrupciones se cancela 
temporalmente, por lo que 
el reloj que os presentamos 
a continuación se puede 
retrasar, eso sí, muy 
ligeramente al usar el disco 
y descaradamente al 
utilizar la cinta. 
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con lo que obtendremos en la pantalla el valor de 
la hora y los minutos, 
En el caso de que le interese localizar la salida 
del reloj a una misma coordenada de la pantalla, 
basta con teclear: 


LOCATE x,y:IRELO] 
y el reloj aparecerá en las coordenadas x, y de la 
ventana número siete; en el caso de que esta 
ventana no esté definida, las coordenadas serán 
las correspondientes al total de la pantalla, 


1010 BUCLE: LO A,(HU 1260 JR NZ , SONAR 1510 1760 LO C,A 
1020 IHe Hl 1270 lO B,5 1520 SONAR: LO B.O 1770 lO A,.B 
1030 CAlL IBB5A 1280 LO Hl,OIR 1530 BUC1: PUSH BC 1780 AOO A.B 
10.0 OJNZ BUCLE 1290 BUC: LO A,(HU 15.0 LO BC.I7F10 mo LO (OEJ,A 
1050 RET 1300 INC HL 1550 OUT (CJ,C 1800 INC OE 
1060 1310 OR A 1560 LO A."B 1810 LO A,C 
1070 CLO: OEFS 6 1320 JR NZ , SAL 1570 OUT (CJ,A 1820 AOO A,58 
1080 BlO: OEFS 7 1330 VI: INC HL 1580 LO A,23 1830 LO CDEJ.A 
1090 EVE: LO HL,SE& 13.0 V2: INC Hl 1590 CALl tBB1E 18.0 INC OE 
UOO OEC (HU 1350 OJNZ BUC 1600 POP BC 1850 INC OE 
Ul0 JR NZ,FL 1360 REY 1610 JR NZ,FIN 1860 REY 
U20 UI (HU ,60 .1370 1620 OJNZ BUCl 1870 
U30 OEC HL 1380 SAL: LO A, (HORJ 1630 LO A,7 1880 ERR: OEFII 
lUO OEC (HU 1390 CP (HlJ 16.0 CALL IBBSA "Orden incorrecta " 
1150 JR NZ,FL UOO JR NZ,Vl 1650 REY 1890 OEFB 10.13,0 
U60 LO (HU.60 Ul0 INC HL 1660 1900 HOR: OEFB O 
1170 OEC HL 1m LO A, (IIINJ 1670 FIN: XOR A 1910 IIIN: OEFB O 
U80 OEC (HU U30 CP (HU 1680 LO (ALARJ,A 1920 SE&: OEFB O 
1190 JR NZ,FL 1..0 JR NZ,Y2 1690 REY 1930 ALAR: OEFB O 
1200 LO (HlJ .2. U50 OEC HL 1700 19.0 OIR: OEFB 0,0,0,0,0,0 
1210 FL: LO A,(VIS) U60 OEC Hl 1710 RUT2: LO OE,IIEN 1950 OEFB 0.0,0,0.0.0 
1220 OR A U70 LO (HU.O 1720 RUT: LO B,IFF 1960 OEFB 0,0,0 
1230 CALL NZ,IIOSTRA U80 LO A,I 1730 ARR: INC B 1970 IIEN: OEFB 0.0,":".,0.0 
12.0 ,LB- 
,(ALAR) U90 LO (ALAR) ,A mo SUB 10 1980 VIS: OEFB O 
1250 OR A 1500 REY 1750 JP NC,ARR 1990 CUR: OEFB 0.0 
AJISTRAD SI'I//(/I/I// y 
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Para que el reloj desaparezca de 
la pantalla hay que volver a teclear 
la orden: 


. 


uno para cada alarma, y «h" y «m" son las horas 
y minutos a las que queremos que nos avise, 
Para «h" y «m" valen las mismas normas que 
para el caso de poner en hora el reloj, con la 
única diferencia de que si «h" toma el valor cero, 
esa alarma se desactiva, Para corregir una alarma 
sirve esta misma orden, como en el caso de poner 
en marcha el reloj. 
Cuando el reloj llega a una alarma cambia el 
color del borde de la pantalla a blanco y hace 
sonar un «beep", esperando a que desactivemos la 
alarma al pulsar la tecla Control. A partir de 
ahora ésta queda desactivada, y se puede utilizar 
para otra alanna, 
Cómo cargar el Reloj, 
Copiar el programa cargador y ejecutado, en 
el caso de que no aparezcan errores se procede a 
salvado con la siguiente orden: 
SA VE "RELOJ" ,B&AOOO,&186 
Para ver su funcionamiento deberemos cargado 
en memoria de la siguiente forma: 
MEMORI &9FFF:LOAD"reloj,bin" ,&AOOO 
y después hacer: 
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IRELOj 
Para programar una de las cinco alarmas de 
las que disponemos, basta con ejecutar un: 
I RELOj ,al,h,m 
donde «al" puede tomar los valores del O al 4, 


CALL&AOOO 


para tener disponibles las RSX. 
Para los más curiosos ofrecemos a continuación 
el listado del programa desensamblado, del que 
estamos seguros sacarán un buen partido, 
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Para solicitar 
tus tapas, 
lIámanos 
al tel. (91) 
734 65 00 
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No necesita enc uadernación 
- - 
gracias a un sencillo 
sistema de fijación 
que permite además 
extraer cada revista 
cuantas veces sea necesario. 
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THESEU 


Por Óscar Valladares MartÍnez 


A finales de nuestra era, en un planeta 
dimensional en algún lugar de nuestro sistema, 
un hombre llamado Amhalet se dispone ha 
finalizar con una amenaza llamada Organización 
Zulion, la cual podría ser la causa de la 
destrucción de su mundo, 
Tu misión será el manejar a nuestro héroe en 
dos distintos sectores. En el primero tendrás que 
intentar no chocar con las fuerzas del maligno. 
En el segundo tendrás que soltar a los tres 
científicos que están encerrados en el templo, Los 
habitantes del sistema confían en ti. 
El programa contiene instrucciones de manejo 
y misión, 


LiNEAS PARTE 
100-370 Datos 
380-560 Gráficos 
570-1080 Pantalla principal r 
1090-1550 Movimiento del iuego y 
obstáculos 1
1 
1560- 1610 Anula vida 
1620-1910 Templo 
1920-2010 Final 1',- 
2020-2060 Game Over '
, 
. 
2070-2460 Instrucciones L. 
2470-2540 Scroll 
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VARIABLES 


I!¡: 


I 


TECLAX 
TECLAXX 
TECLA y 
TECLA YY 
LI 
HS 
SC 
sec 
MTS 
SCROLL 
templo 
FIN 
MEN$ 
ME$ 
llave 1 
lIave2 
lIave3 
hombre3 
hombre2 
hombre 1 
lliscro$ 
lIIiscro$ 


desplaza helicóptero 
desplaza helicóptero 
desplaza helicóptero 
desplaza helicóptero 
vidas 
récord 
puntos 
sector 
distancia 
pone en marcha el scroll 
indica el templo 
indica el final 
gráfico 
gráfico 
gráfico 
gráfico 
gráfico 
pinta hombre 
pinta hombre 
pinta hombre 
pinta gráficos scroll 
pinta gráficos scroll 


IlIIiscro$ 
IVliscro$ 
VPiscro$ 
Vlliscro$ 
COLUM$ 
CCOLUM$ 
CCCOLUM$ 
SECOS 
LADRI $ 
BILADRI$ 
puel$ 
pue2$ 
BACOL$ 
PA1$ 
PA2$ 
PA3$ 
PA4$ 
PA6$ 
PA7$ 
PA8$ 
PA9$ 
PA10$ 


pinta gráficos scroll 
pinta gráficos scroll 
pinta gráficos scroll 
pinta gráficos scroll 
pinta columna 
pinta columna 
pinta columna 
pinta columna 
pinta ladrillo 
pinta ladrillo 
pinta puerta 
pinta puerta 
pinta columna 
pinta templo 
pinta templo 
pinta templo 
pinta templo 
pinta templo 
pinta templo 
pinta templo 
pinta templo 
pinta templo 
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10 - U.U...U....UU...UU.. 
20 -.. T 11 E S E U U 
30 -** Por ** 
40 
 ** Oscar ** 
50 -** Valladares ** 
60 
U Jllartinez ** 
70 '.. 1987 U 
80 '.. AlISTRAD SEl!AIIAL .. 
90 -...UU.U................. 
100 PASADAA
O 
110 CALL &IJC02 
120 IIS=O 
130 - ............U..U..... 
140 '. DATOS . 
150 -U.............U...... 
I
O rAPEH O: PAPEH #5, O 
170 TECJ,AX=66: TECLAXX=66: TECLAY=66: TECLAYY=66 
180 LI=2: :3C=O: HS=H:J: sec=l: JITS=510: SCROLL=l: 1m 
TR08'=l: tf'mplo=O: sec-=l: se=1: FIJ=O: desplll=O 
190 IlEII$=CIIR$ ( 146) fCIIR$ ( 148) : IIE$=CIIH$ ( 147) +CII 
R$<I49): 11avel=1: hODlbn>l=l 
200 JI1JVE$=CIIH$( 156) 'CIIH$( 15'/) fCIIR$(158): llave 
2::::1: bombre2=1: 1 lavE"3= 1 : hombre3=1 
210 Iliscro$=CHRS(159) lCHR$(160): IIliscro$=CH 
H$(32) fCIIR$( 161) +CIIR$ (162) fCIIR$( 163) +CIIR$ (1M 
; 
2é:O 1111 iscro$=CHRS( 165)+CHRS( 166)+CHRS( 169)+ 
CIIR$(170HCIIR$(I71) 
230 IVliscro$=CIIR$( 167) ,CIIR$( 168>+CIIR$ <1n>+c 
IIR$( 1'73) +CIIR$( 174) 
240 VI iscro$=CIIR$ (175) +CIIR$( 1 '76>+CIIR$( 1'7'7> +Cil 
Q$<1'78)+CIIR$<179) 
250 VIliscro$=STRIWG$(l1,180) 
260 COLUJI$=CIIR$ ( 189) +CIIR$ (190) +CIIRH 191> : CCOL 
UJI$=CIIR$(32) +CIIR$( 193): CCCOLUJI$=CIIR$(194) +CIIR 
$ (195) +CIIR$ (196) 
270 SECO$=CIIR$(190) +CIIR$( 191>: LADRI$=CIIR$<19'7 
) : BI LADR 1 $=CIIR$ <19'7) +CIIR$ <19'7) : pue U
CIIR$ <12'7 
) : pue2$=CIIR$ ( 12'7> : BACOL$=CIIR$ ( 192) 
280 I'Al$=SECO$+" "'COLUJI$+LADRI$+" "+BILADRI 
$ 
¿90 PA2$= BACOL$+ LADR I $ fBI LADRI $+ LADR I $+BACOL$ 
P' ".PUEl,f,+" "+LADRI$ 
300 PA3$=BACOL$+" "+BACOL$+BILADRI$+LADRI$ 
+PUE2$+LADRI$ 
310 rA4$=BACOL$+" "'LADRI$+BILADRI$+BACOL$+BI 
LADRI$..... n+LADRI$ 
320 PA'J$
JJACOL$+" "+BILADRI$+LADRI$+" "+BI 
LADR I $ 
330 PA6$
BACOL$+BILADRI$+" "+LADRl$ 
340 PA7$=BACOLU" "+BILADHI$+" "+BILADRI$+PUE 
2$' LADRI$fPUE2$+LADRI$ 
350 rA8$=BACOLU" "+LADRI$+" "+LADRI$+" "+L 
ADRI$+" "+LADRI$ 
360 PA9$=BACOLU" "+PUEU+"" 'LADRI$+" "fLAD 
RIUBILADRI$+LADRI$ 
370 rAI0$=BJLADRI$+BlLADR1U" "+BILADRI$+BILA 
DRI$+BILADRI$ 
380 - ........U""""** 
390 -. SYIIBOLS . 
400 - U....U.......U... 
410 SYIIBOL AFTER 32 
420 SYJIBOL 209,255,255,231,195,195,231,255,25 
5:SYJIBOL 185,1,3, '7,15,25,5'7, 12'7,255:SYIIBOL 18 
6,128,192,224,240,152,156,254,255:SYIIBOL 18'7, 
255,12'7,5'7,25,15, '7, 3,1: SYJIBOL 188,255,254,156 
,152,240,224,192,128: SYIIBOL 129,0,148,148,146 
,146,145,209, O 
430 SYIIBOL 130,O,91,82,154,14'7,I'7,2'7,O:SYIIBOL 
131, O, 219,146,146,210,82,219, O: SYJIBOL 132 O 
1'79,1'70,1'79,1'70,1'70,171, O: SYIIBOL 133,0,168: 16 
8,235,168,168,168, O: SYIIBOL 134, O, 54, 36, 164,52 
,20,54, O: SYJIBOL 141,0,115,66,6'7,114,18,115, O 
440 SYJIBOL 142,0,156,16,16,16,16,156, O:SYIIBOL 
144,0,139,218,171,138,138,139, O: SYIIBOL 145, O 
,1'77,41,3'7,35,33,161, O: SYIIBOL 146,255,128,128 
,128,128,128,128,128: SYJIBOL 14'7,128,128,128,1 
28, 128, 128, 128,255:SYIIBOL 148,255,1,1,1,1,1,1 
,1 
450 SYJIBOL 149,l,l,l,l,l,l,l,255:SYIIBOL 152,0 
,15,1'7,255,151,136,51,51: SYJIBOL 150, 0,15,18,2 
41,141,131,219,24: SYIIBOL 151,0,128,64,32,223, 
129,219,24: SYJIBOL 153,0,69,108,84,68,68,69, O: 
SYJIBOL 154, O, 24'7,68,68,71,65,8'7, O: SYIIBOL 155, 
132, O, 41, 0,146, O, 36,129 
460 SYIIBOL 156,1,6,24,34,44,18,1, O: SYIIBOL 15'7 
,34,213,4,2,0,1'7,110,128: SYIIBOL 158,168, '78, 34 
,69.193,34,26.0:SYIIBOL 159.0,0.4,14,31.63.12'1 
,127:SYJIBOL 160,O,O,O,O,O,O,O,128:SYIIBOL 161, 
O, O, 20, 42, 65. 0.1.1: SYIIBOL 162, O, 0,1, 2, 5,198, 2 
33,111 
4'70 SYIIBOL 163,106,253,122,164,69,170,81,138: 
SYIIBOL 164,128,128,128,128,64,192,64,224:SYIIB 
OL 165,O,O,O,O,O,l,l,2:SYIIBOL 166,1,1,1,3,2,3 
,198,203: SYJIBOL 16'7,3,3,5,5,5,6,13,10: SYIIBOL 
168,7'7,13'7,154,1'7'7,90,181,95,16'7: SYIIBOL 169,2 
14,106,1'73,90,180,90,174,88 
480 SYJIBOL 1'70,160,9,1'70, O, 36,136, 32,136: SYIIB 
OL 171,32,40,44,52,20,24,140,12: SYIIBOL 1'72,17 
2,26,232,41,212,98,168,69: SYIIBOL 1'73,160,16,6 
4,16,162, O, 80, 32: SYJIBOL 174,36,84,8,16,16,8,3 
6,4: SYIIBOL 1'75,21,106, 1'71,85,1'75,91,1'71,18'7 
490 SYJIBOL 1'76,90,183,87,87,218,183,91,190:SY 
IIBOL 1'7'7,162, '72,148, 66,160, 2, n,lO: SYIIBOL 1'78 
,0,160,0,192,8,128,0,12'7: SYIIBOL 1'79,4,6,3,65, 
161,1'7,l,159:SYIIBOL 180,32,48,120,248,120,32, 
35,220:SYJIBOL 181,9,38,23,1'75,95,63,191,63 
500 SYIIBOL 182,127,191,63,143,103,84,34,O:SYI! 
BOl: 183,64,148,224,234,244,250,248,250: SYIIBOL 


184,252,248,242,240,196,144,32, O 
510 SYIIBOL 189,255,255,42,21,10.5,2,I:SYIIBOL 
190,255,255,82,82,82,255,255: SYIIBOL 191,255,2 
55,84, 168,80, 160,64, 128:SYIIBOL 192,219,219,21 
9,219,219,219,219,219 
520 SYJIBOL 193,219,219,219,219,219,219,255,25 
5:SYIIBOL 194,I,2,4,15,16,12'7,255,255:SYIIBOL 1 
95, 0,255, O, 255, O, 255, 255, 255: SYIIBOL 196,128,6 
4,32,240,8,254,255,255 
530 SYIIBOL 197, O, 255, 255, 255, 255, 255, 255, 255: 
SYIIBOL 198,1), 254, 254, 254, 254, 254, 254, 254: SYIIB 
OL 199,126,16,48,89,20'7,56,16,60: SYJIBOL 200,5 
6,16,48, '73, 223, 48,16, 60 
540 SYIIBOL 201, 126,8, 12, 154,243,12,8,60:SYIIBO 
L 202,28,8,12,154,243,12,8, 60:SYIIBOL 203,48,1 
'78,164,120,48,48, '72, 204: SYIIBOL 204,16,40,40,1 
6,24,16,28,16: SYIIBOL 205,16,16,16,224,128,128 
,183,48: SYJ!BOL 206,16,16,16,8,63,1,183,48 
550 IF PASADAA=l THEII 600 
560 GOTO 2110 
5'70 - **..**..............**.. 
580 -** PAIITALLA PRIIICIPAL .. 
590 ' .**..**.......**....**.. 
600 lIDIE O 
610 IIIK 0,3: BORDER 3 
620 FOR f
4 TO 22: LOCATE '7, f: PEII 8: PR I lIT CIIR$ 
(143): LOCATE 19, f: PRIIIT CIIR$(143): fiEXT 
630 LOCATE 8,2: PR I lIT STRIIIG$( 11,143): I,OCATE 8 
,3: PR I lIT STRIIIG$(l1,143) 
640 LOCATE 8,23:PRIIIT STRIIIG$(11 , 143) : LOCATE 
8,24: PRIIIT STRIIIG5(11,143) 
650 LOCATE '7,2:PRIIIT CIIR$(214):LOCATE 19,2:PR 
IIIT CIIR$(215) 
660 LOCATE '7,24: PRJIIT CIIR$(213): LOCATE 19,24, 
PRIIIT CIIR$(212) 
6'70 LOCATE '7,3:PRIIIT CIIR$(209):LOCATE 19,3:PR 
IIIT CIIR$(209) A 
680 LOCATE '7,23: PRIIIT CIIR$(209): LOCATE 19,23: 
PRIIIT CIIR5(209) 
690 PLOT 226,45,2: DRAV 5'74,45: PLOT 226,4'7: DRA 
V 5'74,47 
'700 PLOT 220,45: DRAV 220,350: PLOT 220,382: DRA 
V 5'74,382 
'710 PLOT 224,383:DRAV 5'74,383:PL(Jf 574,383:DR 
AV 606,368 
no PLOT 606,368: DRAV 606,32 
'730 FOR f
3 TO 6: LOCATF. 2, f: PEII 8: PRJliT CIIR$( 
143):LOCATE 5,f:PRIIIT CHR$(143):fiEXT 
'740 LOCATE 3,2: PRIIIT CIIR$<143>+CIIR$(143) 
'750 LOCATE 3,7: PRIIIT CIIR$(143) +CIIR$(143) 
760 FOR f
10 TO 23: LOCATE 2, f: PRIIIT CIIR$(143) 
:LOCATE 5,f:PRJIIT CIIR$(143):JlEXT 
'7'70 LOCATE 3,9: PRIIIT CIIR$<143>+CIIR$(143) 
'780 LOCATE 3,24: PRIIIT CIIH$<143>+CIIR$(143) 
'790 LOCATE 2,2:PRIIIT CIIRHI85):LOCATE 5,2:PRI 
liT CIIR$(186): LOCATE 2,9: PRlliT CIlH$(185): LOCAT 
E 5,9: PR I lIT CHR$(186) 
800 LOCATE 2, '7: PRII1T CIIR$<18'7): LOCATE 5, '7: rRI 
lIT CIIR$(188): LOCATE 2,24: PRlliT CIIR$(187): LOCA 
TE 5,24: PRIIIT CIIR$<18B) 
810 PLOT 160,32:DRAV 160,256,2:PLOT 160,256:D 
RAV 128,2'72 
820 LOCATE 3,3:PEII 13,PRIIIT CIIRHl41)+CIIR$<14 
2) 
830 LOCATE 3.10: PEIi 13: PR I lIT CIIR$(144) +CIIR$<1 
45) 
840 LOCATE 3,12: PEII 6: PR I lIT 1lEJi$: LOCATE 3,13: 
PRIIIT IIE$ 
850 LOCATE 3,15: PRIIIT I!EII$: LOCATE 3,16: PRlliT 
IIE$ 
860 LOCATE 3,18: PRIIIT 1lEJi$: LOCATE 3,19: PRIIIT 
IIE$ 
8'70 LOCATE 3,21:PRIIIT I!EII$:LOCATE 3,22:PRIIIT 
IIE$ 
880 PLOT 128,2'72: DRAV 64,2'72: PLOT 60,32: DRAV 
60,256 
890 PLOT 60,30: DRAV 124,30: PLOT 60,28: DRAV 12 
4,28 
900 VII!DOV 18,8,4,22: PAPER 5: CLS: VII!DOV 20,1, 
1,25 
910 VII!DOV #5,4,3,3,6 
920 LOCATE 9,4: PEII 6: PR I lIT CIIR$<131HCIlR5<132 
) 
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930 LOCATE 13,4: PEII 9: PRIIIT CIlR5<133HCHR$<13 
4) 
940 LOCATE 16,4: PEII 12: PR I lIT CIIR$<129>+CIIR$<1 
30) 
950 LOCATE 8,22: PEII 9: PR I liT CIIR5<153HCIIR$<15 
4>+CIIR$(61) 
960 LOCATE 8,5:PEII 10:PRIIIT (SC):LOCATE 12,5: 
PRIIIT (I!S):LOCATE 15,5:PRIIIT (LD,LOCATE 11,2 
2: PRIIIT (IITS> ¡ "lit" 
9'70 LOCATE#5,l, 3: PEII #5,10: PRIIIT #5, (SilC) 
980 VllIDOV "4,18,8,6,16:PAPER "4,10:CLS "4 
990 LOCATE n,l,6:PEII #4,2:PRIIIT n,IIUVE$:LOC 
ATE "4,4,6:PEII '4,6::PRIIIT '4, Iliscro$ 
1000 LOCATE n,4,4:PEII "4,2:PRIIIT n,IIUVI!$:LO 
CATE n, 9, 3: PRIIIT n,IIUVE$: PEII "4,6: LOCATE "4 
,I,7:PRIIIT "4, 1 Iliscro$ 
1010 LOCATE n,I,8:PRIIIT n,I1Iliscro$:LOCATE 
'4.1. 9: PRflT #4. IVliscro$ 
1020 LOCATE "4,1,10: PRIIIT n, Vl1scro$ 
1030 LOCATE n,9,6:PRII1T '4, I l1scro$: LOCATE , 
4,6, '7: PRIIIT "4, I Iliscro$: LOCATE n, 6, 8: PRIIIT 
"4, 11 Iliscro$: LOCATE n,6,9:PRIIIT "4,IVl1scro 
$: LOCATE n, 6,10: PR I lIT n, Vl1scro$ 
1040 LOCATE n,l,11: PEII "4,9: PRJIIT n, VIliscr 
0$; 
1050 LOCATE "4,1,2: PEII '4,1: PR I lIT '4, CIIR5<181 
>+CIlR$(183):LOCATE n,I,3:PRIIIT n,CIIR$<182H 
CIIR$<1B4) 
10LO PLOT 160,304,2: DRAV 160,366: PLOT 160 366 
:DRAV 128,382 ' 
10'70 PLOT 128,382:DRAV 64,382:PLOT 62,366:DRA 
V 62,300 
1080 PLOT 62,300: DRAV 126,300: PLOT 62,302: DRA 
V 126,302 
1090 - .**.............**...... 
1100 -. IIDVIIIIEIITO JUEGO y . 
1110 -. OBSTACULOS . 
1120 - **..**..**..**.......... 
1130 FOR OBSTACU=18 TO 22 
1140 IlUlIEOBSTA<OBSTACU-I'7> =18: IlEXT 
1150 X=19 
1160 DEF FII point(y,x)=TEST«y.32)-2, (401-x>1 
6» 
1l'70 IF llIKEY<O)
O UD sec=l TREII X=X-l: IF X< 
17 TIIEII X=l'7 
1180 IF IIIKEY(2)
0 AIID sec=l THEII X
X+1: IF X) 
2l TIlEII X=21 
1190 IF IIIKEY<2'7)=O THEII 1950 
1200 IF IIIKEY<TECLAX)=O THEII Y=Y-l:se=l 
1210 IF IIIKEY(TECLAXX)=O THEII Y=Y+1:se=2 
1220 IF IIIKEY<TECLAY>=O TIlEII X=X-l 
1230 IF IIIKEY<TECLAYY)
O TIlEII X
X+1 
1240 IF SCROLL
l TIIIIII CALL 1'7000 
1250 re
FII point(y, x) 
1260 IF IIETROS=l THEII IITS=JI'I'S-l:LOCATE 11,22: 
PEII 10: PRIIIT (IITS) 
12'70 IF SRC=2 TIIIIII SOUIID 1,3000,4,15 
1280 IF tellplo=O TIIIIII roUIID 2,2500,40,10 
1290 IF sec
l TIIIIII PEIl1:LOCATE 8,x:PRIIIT CHR 
S(150) ¡: LOCATE 9, X: PRIIIT CIIRS<151> ¡ 
1300 IF sec
2 AIID se
l TIIIIII PO l:LOCATE y,x: 
PRIIIT CIIRS<19Q);: LOCATE y, x: PRIIIT CIIR$(200): 
1310 IF sec
2 AIID y>14 AIID x)=l'7 TIlEII y=14: x= 
x 
1320 IF sec=2 AIID se
2 THEII PBII 1: LOCATE y, x 
: PRIIIT CIIR$(201);: LOCATE y, x: PRIIIT CIIRS(202) 



A
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R
,y

9 AIID x)=l'7 TIIIIII y=9:X=x 
1340 IF sec
2 AIID x)
21 TIlEII x=21:LOCATE y,22 
:PR1I1T" .. 
1350 IF TEIIPLO=O TIlEII rE) 2: XYOBSTA
1+ IIIT(RID 
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1360 PEII 3 
13'70 IF TE
O TRE.- .uJIEOBSTA(IYOBSfA)=IUIII! 
OBSTA(XYOBSTA)-I: LOCATE .uJIEOBSTA(XYOBSTA), XI 
OBSTA+16: PRIBT CHR5(152)," " 
1360 IF .uJIEOBSTA(XYOBSTA)=9 UD XYOBSTA+16=. 
TEE.- Ll=LI-l:LOCATE 15,5:PEIII0:PRIBT (L!):E 
IV 2,1,14,1.10, -1, 20: SOUID 3, O, O, O, 2, 0,15: GOT 
o 1590 
1390 IF .uJIEOBSTA(XYOBSTA)=8 TRE. IIUJIEOBSTA(X 
YOBSTA)=16: LOCATE 6, XYOBSTA+16: PRIBT CHR$(32) 
: SC=SCH1/3): LOCATE 6,5: PE. 10: PRIIIT CIBT(SC) 


1400 IF SC>=BS TEE.- BS=SC: LOCATE 12,5: PEII 10: 
PRIIIT CIBT(BS) 
1410 IF IITS=O TIIEII SCROLL=O: IlETROS=O: TE
1 
: 1ITS=-1 
1420 IF re=2 TRE. LI=LI-l: LOCATE 15,5: PE. 10: 
PRIBT (L!) :EIV 2,1,14,1,10,-1, 20:SOUJD 3, O, O, 
O,2,O,15:GOTO 1'750 
1430 IF 11l1vel=1 UD y=12 UD x=9 TRE.- 11l1vel 
=0: OOUID 1,100,20,15: LOCATE 11,15: PRIBT" ": SC 
=SC+10 
1440 IF ho.brel=1 UD y=9 UD x=15 TIIEJI ho.br 
el=O:OOUID 1,300,20,15:LOCATE 1'7,9:PRIIT" ":8 
C=SC+10: LOCATE 3,12: PEII 1: PRIIIT CHR5<143HCHR 
5(143): LOCATE 3,13: PRIBT CHR$<143HCHR$<14.
) 
1450 IF lll1ve2=1 UD y=16 UD x=6 TRE. lll1v,,2 
=O:SOUJD 1,100,20,15:LOCATE 15,13:PRln" ": >c 
=SC+10 
1460 IF hombre2=1 UD y=14 UD x=15 THEJ homb 
re2=0: SOUID 1,300,20,15:LOCATE 15,6: PRIIT" ": 
SC=SC+10: LOCATE 3,15: PE. 1: PRIBT CHR5<143HCH 
RS(143): LOCATE 3,16: PRIBT CHR5<143HCHR5(143) 


14'70 IF lll1ve3=1 ID y=14 UD x=6 TREII llave3 
=O:SOUID 1,100,20,15:LOCATE 1'7,13:PRIIT" ":SC 
=SC+10 
1460 IF hODbre3=1 UD y=1'7 UD x=14 THEJ homb 
re3=0:OOUID 1,300, 20,15:SC=SC+10:LOCATE 3,16: 
PE. 1: PRIBT CHRS<143HCHRS(143): LOCATE 3,19: P 
RIBT CHR5<143HCHRS(143) 
1490 IF ho.bre3=0 TREII 1690 
1500 IF L 1 =0 TRE. 2020 
1510 IF FIII=1 UD y>=6 UD y<l1 UD .>=19 TRE 
. 1900 
1520 LOCATE 6,5:PEI 10:PRIBT CIBT(SC) 
1530 IF tellplo=l TRE. tellplo=2: GOTO 1650 
1540 IF sec=1 TRE. LOCATE 9, X: PRIBT " ": LOCAT 
B 8,I:PRIBJ"'" ":GOTO 1170 
1550 IF sec=2 TRE. LOCATE y,.:PRIIT" ":GOTO 1 
1'70 
1560 -************UU** 
15'70 '* AIULA VIDA * 
1560 - ***U*********U** 
1590 FOR f=1 10 15: LOCATE 6, X: PEII f: PRIIIT CHR 
5<155HCHRS(155): fiIT 
1600 IF PASADA=1 TRE. PASADA=O:GOTO 11'70 
1610 PASADA=I: GOTO 1590 
1620 -*****UU********* 
1630 - * THIIPLO * 
1640 ' *UU*U**U****U 
1650 LOCATE #4,6,4: PEII #4,2: PRIBT #4, COLUIIS+C 
OLUD 
1660 LOCATE #4,5,3:PRIBT #4,STRIIIGS('7,IQ'7),:L 
OCATE #4,6,2: PRIIIT #4, STRIIIG5(6,19'7>, : LOCATE 
#4, '7,1: PRIBT #4, STRIIIG*(5,19'7), 
16'70 FOR f=1 10 '7:LOCATE #4,'7,f+4:PRIBT #4,cn 
R5(192): LOCATE #4,10, f+4: PRIIIT #4, CHRS(192): 11 
EIT 
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1660 PEII 2:LOCATE 13,1'7:PRIIIT CCOLUI!$+" "
CCO 
LUIIS 
1000 LOCATR 13,16: PRIIIT CCCOLUI!$
CCCOLUIIS, 
1'700 LOCATE 9,X:PRIBT " ":LOCATE 6,.:PRIIT" " 
1'710 FOR f=9 10 16 
1'720 FOR t=1 10 30:fiIT:LOCATE f,20:PRIBT CHR 
5(150HCHRS<151>:LOCATE f-l,20:PRIBT" ":fiIT 


1'730 IF despla=1 TRE.- 1'750 
1'740 YlIDOY 16,6,6,22: PAPER 5: CLS: YlIIOOY 20,1 
,I,25:despla=I:GOTO 1'710 
1'750 PAPER #4,5: LOCATE #4,1,1: PRI, BT#4 STRIIIG5 
<11,19'7): LOCATE #4,1,2: PRIBT #4, PAlS, : PRIBT # 
4, PA25, : PRIBT #4, PA3S, : PRIBT #4, PA45, : PRIIIT # 
4, PA5S, : PRIBT #4, PA65, : PRIIIT #4, PA'75¡ : PRIBT # 
4, PA65, : PRIBT #4, PA9S, : PRIBT #4, PAlOS, 
1'760 IF hombrel=1 TIIEII PE'- 15: LOCATE 9,15: PRI 
IIT CHRS(203) 
1'7'70 [F llavel=1 TREII LOCATE 12,9:PEII 14:PRIII 
T CHRS(204) 
1'760 IF 118vel=0 TEEII LOCATE 11,15: PRIBT CHRS 
(32) 
1'790 IF 118ve2=1 TEEII LOCATE 16,6: PEII 14: PRIII 
T CHRS(204) 
1600 IF hombrel=O TEEII LOCATE 1'7,9: PRIBT CHRS 
(32) 
1610 IF 118ve2=0 TREII LOCATE 15,13: PRIBT CHR$ 
(32) 
1620 IF hombre2=1 TRE.- LOCATE 14, 15: PEII 15: PR 
IBT CHRS(203) 
1630 IF hombre2=0 TRE. LOCATE 15,6: PRIBT CHRS 
(32) 
1640 IF llave3=1 TIIEII LOCATE 14,6: PEII 14: PRII 
T CHRS(204) 
1650 IF 118ve3=0 TRE. LOCATE 1'7,13: PRIBT CHRS 
(32) 
1660 IF ho.bre3=1 TIIEJI PEII15:LOCATE 1'7,14:PR 
[BT CHRS(203) 
16'70 IF hombre3=0 TRE. 1690 
1660 5ec=2: LOCATE#5,I,3: PE'- #5,10: PRIIIT #5, <S 
EC): TECLAI=6: TECLAXX=I: TECLAY=O: TECLAJY=2: Y=1 
2: 1:=20: GOTO 11'70 
1690 LOCATE y,.: PRIIT" ": 1=1'7: FOR f=1 10 6: 1= 
[-1: PEII 14: LOCATE 1,20: PRIIIT CHR$(205HCHRS(2 
06):LOCATE H2,20:PRIBT" ":fiIT:FIII=I:hombre 
3=3:GOTO 11'70 
1900 FOR f=9 10 16: PEII 2: FOR t=1 10 30: fiIT: L 
OCATE f,20:PRIIIT CHRS(150)+cHR$<15l>:LOCATE f 
'1,20:PRIIIT" ":IIEXT:YlIIOOY 16,6,6,22:PAPER 5 
:CLS:YlIIOOY 20,1,1.25 
1910 LOCATE 3,21: PEII 1: PRIBT CHRS<143HCHRS<1 
43): LOCATE 3,22: PRIBT CHR$<143HCHRS(143) 
1920 - ************U** 
1930"* FIliAL * 
1940 "U******U**UU 
1950 YIIIOOY #5,16,6,6,22: PEII #5,2: PAPER #5,5: 
LOCATE #5,I,I:PRIBT #5,COLUI!$:LOCATE#5,9,I:PR 
IIIT#5,COLUI!$ 
1960 FOR f=2 10 15:LOCATE #5,2,f:PRIBT #5,BAC 
OLS: LOCATE#5,IO, f: PRIIIT #5, BACOLS:fiIT 
19'70 LOCATE #5,1,15: PRIBT #5,CCOLUIIS: LOCATE # 
5,I,16:PRIBT #5,CCCOLUIIS:LOCATE #5,9,15:PRIBT 
#5, CCOLUI!S: LOCATE #5,9,16: PRIBT #5, CCCOLUIIS, 
1960 LOCATE l1,10:PElll:PRIIT"T H E":PEII 9:LO 
CATE 11,12: PRIIT"E 11 D" 
1990 PEII 6: LOCATE l1,16:PRIIT"PULSA":PEII 2: LO 
CATE 11,1'7: PRIIT"SPACF' 
2000 IF IIIKEY<4'7)=0 TRE.- PASADAA=I: GOTO 130 
2010 GOTO 2000 
2020 - ************* 
2030 "* GAIIE OVER * 
2040 - *****UU*** 
2050 YlIIOOY #5,16,6,6,22: PAPHR #5,5: CI.SI5: LOC 
ATE l1,10:PEII3:PRIIT"GAIIE":PHlll:LOCATE 11,"- 
2: PRIIT"OVER" 
2060 GOTO 1990 
20'70 -*****UU***U*** 
2060 -. IJiSTRUCC IOImS * 
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2090 '* IlEIIO PRIIICIPAU 
2100 "*U***U******U* 
2110 CLS: IIIK 0,3: IIODE O: BORDER 3 
2120 PEII 6:LOCATE 1,I:PRIBT STRIIIGS(20, 143),: 
LOCATE 1,2:PRIBT STRIIIGS(20,143), 
2130 LOCATE 1,24: PRIIIT STRIIG5(20,143), :LOCAT 
E 1,23: PRIBT STRIIIGS(20, 143), 
2140 FOR f=1 10 24: LOCATE l,f:PRIIIT CHR5(143) 
: LOCATE 20, f: PRIBT CHR5(143): fiIT 
2150 LOCATE 1,I:PRIIIT CHRS(214):LOCATE 20,1:P 
RIBT CIIR5(215): LOCATE [,24: PRIBT CHRS(213): LO 
CATE 20,24: PRIIIT CHRS(212) , 
2160 LOCATE 1,2: PRIBT CHRS(209): LOCATE 20,2: P 
RIBT CHRS(209):LOCATE 1,23:PRIBT CHRS(209):LO 
CATE 20,23: PRIBT CHRS(209) , 
21'70 YlIIOOY #2,19,2,3,22: PAPHR #2,5: CI.S #2: PA 
PHR #2, O 
2160 PUTr 32,42: ORAl' 610,42,2: PLOT 32,44: ORAl' 
610,44:PLOT 31,42:DRAY 31,366:PUTr 32,396:DR 
AY 606,396: PLOT 32,396: ORAl' 606,396: PLOT 606, 
396: DRA Y 640, 362: PLOT 639, 362: ORAl' 639, 32 
2190 DEG 
2200 PEII 4:LOCATE 1,25:PRIIIT "TIlESEU":IIJI 4,3 
2210 FOR IFI 10 169: FOR n=O 10 15 
2220 ORIGIII O, O: IF IIOT TE81<m, n)=O TIIEJI GOSUB 
2240 
2230 fiIT: fiIT: GOTO 2250 
2240 ORIGII 32,300: PLOT 3S11, 3S11,13: RETURII 
2250 PAPER 5:LOCATE 6,6:PEII 2:PRIIT"Por":LOCA 
TE '7,9: PEII 1: PRIIT"lJscar": LOCATE 4,10: PEII 10: 
PRIBT"'Vallll.dares. .. 
2260 PAPHR 5: LOCATE 3,15:PEII9:PRIIT"I-IIISTRU 
CCIOIIES": LOCATE 3,1'7: PEII 6: PRIIT"2-JUEOO' 
22'70 LOCATE 3,22: PEII 2: PRIIT"Pul6ll U/2>''' 
2260 IF llIKEY(64)=0 TRE.- 2310 
2290 IF IIllEY(65)=0 TIIEII PAPHR O:GOTO 24'70 
2300 GOTO 2260 
2310 YIIOOY #3,19,2,6,22: PAPHR #3,5: CLS #3 
2320 LOCATE 3,16: PEII 3: PRIIT"TECLAS": LOCATE \1 
,16: PEII 2: PRIIT"=CURSORES": LOCATE 9,16: PRIIT" 
P=ABilDOIlAR" ., 
2330 LOCATE 3,22:PEII I:PRIIT"PuI6ll ESPACIO." 
2340 cdeS=" TU 11181011 CO.8ISTE EII LOGRAR 
QUE IIUESTRO REROE TIIESI!U LIBRE A LOS TRES CI 
EBT[FlCOS QUE SE H.-CUEBTRAII HII HL TEIIPLO DH T 
ESEA, PARA HLLO TllESEU8 TEIDRA QUE UTILIZAR U 
11 COCHH Y UI HELICOPTHRQ, *U SUERTE * 
** 
2350 10=9*2-10*(2=1> 
2360 IF LEII(cde5)(10 TEEII cdeS=cdeS
SPACE$<lo 
-LEII<Cde5) ) 
23'70 101=LEII(cdeS) 
2360 y=10 
2390 PEII 11: LOCATE #3,1, y: PRIBT #3, LEFT5(bS, 
lo)¡ 
2400 YHILE lIllEY<4'7)(0 
2410 cdeS=IIIDS(cdeS,2)
LEFT5(cdeS,l> 
2420 LOCATE 2, Y 
2430 PEII 11: PRIBT LEFTS(cdeS, lo), 
2440 YHID 
2450 YHILE l1IKEY50" ": kS=IIllEU: YEID 
2460 PAPER O: GOTO 24'70 
24'70 "*******UU************* 
2460 -* SCROLL * 
2490 '***U****U********U*** 
2500 FOR x=1 '7000 10 1'7044 
2510 READ 8S: POIU! ., VAL("&"
aS) 
2520 IlEIT 
2530 DATA 21,3c,C3,06,06,C5,H5,06,06,C5,06,2b 
,H5, '7H,H5,l1, 2b,OO,19, '7'7,El,23, '7H,2B, '7'7, 23,10 
,F9, Hl,l1, 00, 06, 19, Cl,10, H5, Hl,l1, 50, 00,19, Cl 
,10,D9,C9 
2540 GOTO 600 
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Para que tus 
dedos no realicen 
el trabajo duro, 
AMSTRAD 
Semanal lo hace 
por ,i, Todos los 
listados que 
incluyan este 
logotipo se: 
encuentran a tu 
disposiLión en un 
cassette rncnsual, 
solicítanoslo, 
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Cassetes no, 
gracias 


\, Poseo un CPC 6128 al cual 
deseo conectar un datacassette, 
Éste ya lo he comprado, es un 
Computer Data Recorder de la 
marca International, con su 
correspondiente cable de 
conexión, También he adquirido 
un programa de juego en cassette, 
que según la funda debería 
funcionar en mi modelo de 
ordenador. Ahora el problema es 
que no logro que me entre. Lo he 
intentado por las instrucciones de 
la Guía del Usuario y por las que 
vienen con el programa, pero sin 
resultado, Me sale «Press play 
and then any key», y cuando lo 
hago el cassette se pone en 
marcha pero al final no ocurre 
nada, Debe ser que hay algo que 
no entiendo bien, 


2, He tecleado el listado del 
juego del Backgarnrnon que 
publicaron en el número 73 de su 
revista, lo he revisado varias veces 
sin encontrar error alguno, pero 
cuando lo pongo en marcha me 
sale «Improper argumem in 
1910», ¿Tienen ustedes alguna 
explicación para esto? 
Thornas Zirnrner 


Los cassettes dan muchos 
problemas con el 6128, Cuáles son 
y su solución, puede encontrarlo 
en AMSTRAD Semanal 72, página 
4, 
En la línea ],910 del juego 
Backgarnrnon se manejan 
cuatro variables, Una de ellas, a 
lo largo del programa, adquiere 
un valor fuera de rango; de ahí el 
mensaje de error. La única 
solución es seguir la pista de las 
cuatro a través del juego, 
insertando sentencias Print 
cuando aparezcan hasta encontrar 
el error, 


Improper 
argument 


Respondiendo a la invitación 
propuesta en su carta, me dirijo a 
ustedes para plantearles una duda, 


I 
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Sin duda 
ALGUNA 


En el AMSTRAD Semanal 
número 70, en la sección «Serie 
Oro», me surje un problema al 
ejecutar el juego Pachotes 
Cuando en la pantalla se 
dibujan los gráficos y el vaquero, 
éste no se mueve y en la pantalla 
se lee el mensaje: «Improper 
argument in 1530» 
Les ruego me den alguna 
sugerencia, ya que el programa 
está bien copiado, pues lo he 
corregido varias veces, 
David Moreno 


Por favor, ver la respuesta a la 
pregunta «Cassettes no, gracias», 
de estas mismas páginas, El 
problema y su solución son de la 
misma índole, 


Syntax error 


Soy un usuario del PC1512, y 
cuando trato de arrancar el Gem, 
se produce el siguiente mensaje de 
error: 
Error sintaxis analizando el 
fichero ASIIGN.SYS GEM vdi no 
instalado, 
¿Cómo solucionarlo? 
Además me gustaría saber: 
¿Qué podría hacer para 
arrancar Gem? 
¿Cómo se saca el Basic? 
¿Cómo se crean directorios y 
subdirectorios? 
¿Cómo se pone en 
funcionamiento un programa? 
José Ángel Moreno 


/, El error que se produce en 
su sistema indica que los discos de 
arranque del Gem no están en 
buen estado, Tendrá que 
conseguir otra copia de parte de 
la gente que le vendió el 
ordenador o de un amigo 
«misericordioso», De todas 
maneras, y por si acaso, vamos a 
detallarle los pasos que nosotros 
seguimos en nuestro ordenador 
para ejecutar el Gem, 
- Apague el PC si estaba 
encendido y vuelva a conectar/o, 
- Introduzca el disco Gem 
Startup. 
- Cuando el PC se lo indique, 
saque el disco anterior y meta el 
Gem Desktop, 
En nuestro sistema, esta 
secuencia de operaciones basta 
para que el Gem aparezca en 
pantalla sin ningún problema. 
2, Simplemente haga «click» 
con el ratón dos veces en rápida 
sucesión sobre el icono marcado 
Basic 2, o bien haga «clik» una 
sola vez, dirijase al menu fichero 
y seleccione la opción Abrir. 
3, Cuando el Gem abre o crea 
una ventana, verá usted que en 
ella aparece una «carpeta vacía». 
Selecciónela y duplíquela, Luego 
cambie el nombre y meta en ella 
toda lo que quiera. Acaba de 
crear un subdirectorio. 
Si prefiere usar el MSDOS, la 
secuencia de órdenes es la 
siguiente, si posee dos unidades de 
disco: 
b: 
md "nomhre" 
cd "nombre" 
a: 
cd "- 
copy lo _que sea b: 
Suponemos que el subdirectorio 
lo va a crear en la unidad «b»: 
Si sólo tiene una unidad: 
a: 
md "nombre" 
copy lo lo que sea a: 
" nombre: - 
De esta forma, podrá crear e 
introducir lo que desee en 
cualquier subdirectorio. 
4, Bajo Gem, simplemente 
seleccione el icono correspondiente 
con el ratón y haga «click» sobre 
él dos veces rápidamente, Bajo 
MSDOS o DOS PLUS, teclee el 
nombre del programa, En este 
último caso sólo son ejecutables 
las aplicaciones con una extensión 
COM o EXE, 
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En el artículo de esta semana 
presentamos un programa con 
el que se pueden realizar 
scrolls de pantalla) en 
cada uno de los tres 
modos que poseen los 
ordenadores Amstrad, con 
una gran rapidez. 



, 

. 


Hace unas semanas veíamos en esta misma 
sección una rutina que nos proporcionaba un 
scroll pixel a pixel de la pantalla cuando 
trabajábamos en modo 1, 
Este programa, a pesar de realizar un 
desplazamiento suave de la pantalla, posee dos 
grand('s inconvenientes. Uno de ellos es que 
únicamente podemos utilizarlo correctamente 
cuando nos encontremos en un modo de pantalla 
determinado, en este caso el modo 1, 
El otro gran inconveniente es la gran lentitud 
de dicha rutina, ya que debe realizar gran 
cantidad de instrucciones para cada uno de los 
bytes que posee la pantalla, que son nada más y 
nada menos que 16.384, 
Hoy realizaremos una rutina de 
desplazamiento de pantalla de carácter a carácter, 
con lo cual se realizará un scroll mucho más 
rápido, y además será utilizable para cualquiera 
de los modos de pantalla que posee el Amstrad. 
Sin embargo, se perderá en parte la suavidad 
que se conseguía con el anterior programa. 
Veamos, en primer lugar, cuáles son los 
parámetros necesarios para que nuestra rutina 
funcione correctamente. 
Dichos valores se deberán colocar en los 
espacios reservados para ellos en el programa, es 
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decir, en los cuatro bytes que siguen a la rutina, 
que en el listado ensamblador vienen definidos de 
la siguiente manera: 
ANCHO: DEFB 50 
LINEA: DEFB 2 
POSIC: DEFW #0505 
El primero de ellos, es decir, la variable Ancho, 
indicará el número de bytes en forma horizontal 
que serán desplazados por la pantalla, Debemos 
tener en cuenta que en cada uno de los modos 
los caracteres están fonnados por distinto número 
de bytes. 
A continuación se exponen los bytes que 
forman cada carácter en los distintos modos de 
pantalla. 
MODO 2.., 1 CARACTER,.. 1 BYTE 
MODO 1... 1 CARACTER... 2 BYTES 
MODO O.., 1 CARACTER... 4 BYTES 
Se debe entender que este número representa 
los bytes de cada carácter en forma horizontal, ya 
que en sentido vertical todos los caracteres están 
formados por ocho bytes, independientemente del 
modo de pantalla utilizado, 
Otra de las variables del programa es la que 
está representada por Línea, Ésta indicará el 
número de líneas sobre las cuales se debe efectuar 
el scroll. 



Por último, tenemos la variable Posic, que nos 
indicará a partir de qué coordenadas de pantalla 
se desea efectuar el seroll. 
Esta variable deberá tomar el valor #0000 para 
la esquina superior izquierda de la pantalla, Se 
puede decir que toma los mismos valores que ,la 
función Locate de Basic, pero restando un,a umdad 
a la coordenada horizontal y vertical. 
Resumiendo, y a modo de ejemplo, podemos 
decir que con los valores actuales que contiene el 
programa, Se lograría un scroll a partir de las 
coordenadas 5,5 (6,6 para Locate) de una anchura 
de 50 bytes y una altura de dos líneas (es decir, 
de 16 bytes de altura), 
Veamos ahora cómo funciona nuestro 
programa, En primer lugar, se carg
 el regist,ro 
doble HL con el contenido de la varIable Ponc, y 
a continuación se hace una llamada a una rutina 
del firmware: 
CALL #BC1A 
Como recordaremos, esta rutina nos devuelve, 
en el mismo registro HL, la dirección de pantalla 
correspondiente a dichas coordenadas, 


PROGRAMA 
CARGADOR 
10 RE" * CARGADOR CURSO C/K 21 * 
20 RE" ************************* 
30 FOR N=&AOOO TO &A034 
40 READ A:SUKA=SUKA+A 
50 POKE N.A 
60 NEXT 
70 IF SUKA(>&1472 THEN PRINT -ERROR 
EN DATAS. 
80 DATA 42,50.160,205,26.188,58 
90 DATA 49,160,71.197.229,6.8 
100 DATA 197,229,84,93,126,245.35 
110 DATA 58.48.160,6.0,79,237 
120 DATA 176.241.18.225,17,0.8 
130 DATA 25,193,16,231,225,17,80 
140 DATA 0,25.193.16,219,201,50 
150 DATA 2,5.5.0.0.0.0 


Código 
MÁQUINA 


A continuación cargamos en el acumulador la 
variable Línea, introduciéndola a continuación en 
el registro B, para formar así un bucle que nos 
indicará las filas sobre las cuales se debe efectuar 
el desplazamiento, 
Seguidamente se forma otro bucle que se 
repetirá ocho veces, ya que cada una de las filas 
de la pantalla está compuesta por ocho bytes, 
En este bucle es donde se realizará el trabajo 
de scroll de pantalla. 
Para ello se pasan al registro doble DE los 
valores actuales del registro HL, que es el quc 
contiene la dirección de pantalla: 
LOO,H 
LD E,L 
Ahora cargamos en el acumulador el contenido 
de la dirección actual de pantalla, y lo 
preservamos para recuperarlos más tarde: 
LD A, (HL) ;# 
PUSH AF ;# 
A continuación inerementamos el registro HL, 
y cargamos en el acumulador el contenido de la 
variable Ancho, que es la que indica el número de 
bytes en sentido horizontal que deben 
desplazarse: 


INC HL 
LO A, (ANCHO) 
Seguidamente debemos cargar en el registro 
doble BC el número de bytes a 'scrolear'. Para 
ello, cargamos B con cero y en el registro C 
cargamos el contenido del acumulador, con lo 
cual se puede efectuar la operación de 
movimiento del bloque de pantalla: 
LO B,O 
LDC,A 
LDIR 
Una vez hecho esto, debemos recuperar el 
contenido del acumulador que se había 


PROGRAMA ENSAMBLADOR 
1 ORG IAooO 15 PUSH HL 28 LO DE, 2048 
2 16 U) O,H 29 ADO HL.OE 
3 17 LO E.L 30 POP BC 
4 ¡CURSO DE CODIGO MAQUINA 21 18 LO A,(HU 31 OJNZ avc 
5 19 POSH AF 32 POP HL 
6 20 IHC HL 33 lO DE,80 
7 LO HL,(POSIC) 21 LO A, (ANCHO> 34 ADO HL,OE 
8 CALl laCIA 22 LO B.O 35 POP BC 
9 LD A, (LINEA) 23 lD C,A 36 O.JNZ BUC1 
10 LO B,A 24 LO IR 37 RET 
11 BVC1: PVSH BC 25 POP AF 38 ANCHO: OEF8 50 
12 PUSH HL 26 lO (DE) ,A 39 LINEA: DEFB 2 
13 LO 13,8 27 PCP Ht 40 POSIC: DEFW 10505 
14 auc: PUSH BC 
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preservado anteriormente y cargarlo en la 
dirección a la que apunta el registro doble DE, es 
decir, en el último byte de la línea desplazada: 
PUP AF 
LD (DE),A 
Con lo cual se consigue el efecto de rotación de 
la pantalla; es decir, que lo que desaparece por la 
parte izquierda se recupere por la parte derecha. 
En el caso de que se quisiera efectuar un scroll 
con pérdida del contenido de la pantalla, 
únicamente deberíamos suprimir del listado del 
programa estas dos últimas líneas, junto con la 
marcada con un asterisco '*'. 
Una vez producido el desplazamiento en una 
línea, se debería recuperar la dirección de 
pantalla anterior, a la cual se deberá sumar el 
valor 2,048, para así obtener la dirección del 
siguiente byte de pantalla en sentido vertical: 
POP HL 
LD DE,2048 
ADD HL,DE 
Cuando se haya producido el scroll de los ocho 
bytes que contienen cada una de las líneas, 
deberíamos calcular la dirección de la siguiente 
línea de pantalla, 
Esto lo haremos recuperando la dirección 
inicial de la anterior línea y sumándole el 
valor 80: 


POP HL 
LD DE,80 
ADD HL,DE 
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Una vez finalizado este último bucle, se habrá 
conseguido el desplazamiento de la parte de 
pantalla dada en los parámetros iniciales un byte 
hacia la izquierda. 
Como se podrá comprobar, la velocidad de 
ejecución de esta rutina es realmente rápida, si 
tenemos en cuenta que la pantalla de nuestro 
Amstrad está compuesta por un elevado número 
de bytes. 
Dada la gran versatilidad de esta rutina, ya 
que podemos elegir la zona de pantalJd a 
desplazar, así como sus dimensiones y las 
coordenadas iniciales, se podría utilizar como 
ayuda en cualquier programa Basic o en Código 
Máquina que deseemos realizar. 
Como podemos ver, aquí únicamente estamos 
estudiando el scrolJ hacia la izquierda, pero 
realmente también nos puede ser necesario un 
desplazamiento hacia la derecha. 
Pues bien, esta tarea os la reservo a todos los 
que sigáis este Curso de Código Máquina, 
aunque sí os daré alguna pista que supongo que 
algunos estarán adivinando. 
Como hemos visto, nuestra rutina utiliza una 
instrucción de desplazamiento de bloques como es: 
LDIR 
Por tanto, para efectuar el mismo trabajo, pero 
en sentido contrario, deberemos utilizar la 
instrucción: 


LDDR 
Teniendo en cuenta que en este caso 
deberemos indicar en los registros dobles HL y 
DE la dirección más alta a partir de la cual 
deseamos trasladar los datos. 
Por hoy no resta nada más por decir, 
únicamente desearos suerte en la confección de la 
rutina de desplazamiento a la derecha de la 
pantalla. 
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18 Juegos dinámicos 
para tu Amstrad 


Los juegos son una de las 
primeras utilidades que 
encontramos a los 
ordenadores, También 
pueden ser un buen método 
de aprendizaje, si ya se 
tienen algunas nociones de 
programación, 
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El libro que presentamos 
en esta ocasión puede servir 
de una gran ayuda para 
familiarizarse con estos temas 
y divertirse con los 18 juegos 
que aparecen en él. 
Cada uno de estos juegos 
consta de una explicación y 
el listado que hay que 
teclear, Van amenizados con 
unos simpáticos dibujos 
relacionados con el tema de 
cada juego. 
Cada uno de los 
programas aprovecha todas 
las posibilidades del Amstrad 
en gráficos, color, sonido, 
etc, por lo que es muy difícil 
que se alcancen los mismos 
resultados con otro ordenador 
que no sea de esta marca, 
Una de las advertencias que 
hace el propio autor en el 
prólogo es: los listados están 
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reproducidos 
fotográficamente, por lo que 
los errores que se puedan 
producir al arrancar los 
programas deben ser debidos 
a fallos al teclear, por 
ejemplo al confundir la letra 
o con el O. 
Para grabar los juegos en 
un disco hay que escribir la 
orden Save" < nombre + " 
(entre las comillas se pone el 
nombre del juego), Para 
buscado en el disco y cargado 
se pone Load" y el nombre que 
le hayamos dado. En ambos 
casos, después de escribir las 
órdenes hay que pulsar Enter. 
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Tratamiento 
de textos 


El tratamiento de textos es 
una de las aplicaciones de los 
ordenadores más utilizadas 
actualmente. En todos los 
trabajos de oficina se 
emplean estos métodos para 
escribir, corregir, grabar y 
archivar todos los 
documentos necesarios, 
Por todo esto, el libro está 
dedicado a todas aquellas 
personas que realizan 
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trabajos de oficina o 
administración y que por 
diversas razones tienen que 
reincorporarse al mercado del 
trabajo, o para las empresas 
que están pensando 
implantar, o acaban de 
hacerla, un sistema corno 
éste. 
Aparte de la explicación 
puramente teórica, siempre 
muy útil, el libro dedica un 
gran espacio a las 
explicaciones prácticas y a los 
ejercicios. Pero, quizá, una 
de sus mejores virtudes sea el 
lenguaje sencillo y claro, con 
unos dibujos y gráficos muy 
de agradecer para la 
comprensión de esta forma 
de utilizar el ordenador. 
Además, da una serie de 
indicaciones para la 
resolución de los problemas 
más frecuentes que se 
producen en la utilización de 
programas para tratamiento 
de textos y un glosario con 
todos los términos técnicos 
más usuales, con una 
definición a modo de 
aclaración sobre cada uno de 
ellos. 
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Gráficos 
para PCW 
en Basic 


E s de dominio público que el PCW ha sido 
diseñado y presentado como el procesador de textos 
ideal, por su bajo precio y sus altas prestaciones, 
Esto, sin duda, es así, pero no h'lY que olvidar la 
segunda faceta de esta máquina: 
s un ordenador de 
propósito general con Mallard Basic y sistema 
operativo CP/M Plus 
completo, 
El Mallard Basic es una 
implementación del famoso 
lenguaje con gran potencia 
para las aplicaciones de 
gestión: ficheros aleatorios, 
indexados, manejo de palabras 
y números, etc, 
Sin embargo, las malas 
noticias son que no hay forma 
humana, en principio, de 
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22 AMSTRAD Sonanal 


En princiPiq el Mallard Basic del 
PCW no proporciona comandos 
gráficos. Sin embargq como parte de 
los ficheros estándar del CPIM Plus 
tenemos todo un sistema para el 
procesamiento de órdenes gráficas: el 
GSx, iniciales de Graphic System 
Extension. 


hacer gráficos con él. Si usamos una hoja de cálculo, 
tenemos que ver los resultados en la forma pesada y 
confusa de columnas de números, nada de gráficos de 
barras o de tarta que nos permitirían apreciar, a vista 
de pájaro, el futuro previsible de nuestro negocio, así 
como su situación actual. 
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Sin embargo, no 
todo está perdido, 
Afortunadamente, 
el CP/M incluye 
entre sus utilidades 
el GSX, un 
sistema de 
manipulación de 
gráficos pensado 
para ser usado por 
cualquier 
programa que 
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corra bajo CP/M, 
Las utilidades de GSX son bastante complicadas de 
manejar, pero las rutinas listadas en la tabla 1 
permitirán dibujar puntos, líneas o círculos y llenar 
áreas y superficies de! tipo de los gráficos de tarta. A 
diferencia de las llamadas a órdenes Draw o Plot en 
otros Basic, las de GSX permiten dibujar líneas entre 
gran número de puntos, 
Antes de poder usar las antedichas utilidades es 
necesario «fundidas» con e! Mallard Basic, Esto sólo 
es posible si en e! disco se encuentran presentes los 
ficheros apropiados, Son los siguientes: 


GSX.SYS 
ASSGN,SYS 
DDSCREEN,PRL 
DDFXLR8,PRL 
DDFXHRB,PRL 
GENGRAF.COM 
BASIC.COM 


o 


El siguiente paso es teclear Gengraf Basic, 
exactamente así. Sin comillas, con un espacio entre 
ambas palabras y, eso sí, indistintamente en 
mayúsculas o minúsculas, 
El efecto de esta secuencia cabalística de comandos 
es unir al Mallard Basic un pequeño cargador que 
gestionará las órdenes gráficas que se le suministre, El 
fichero Gengraf.Com, una vez hecho todo esto, puede 
borrarse del disco, pero el resto debe estar siempre 
presente, 
Cuando usted arranque e! Mallard, tecleando 
Basic, gracias a la acción de! cargador «fundido» con 
Gengraf, se incluirá también en memoria el sistema 
gráfico, 
Una de las facilidades más importantes de GSX es 
que, para el programa que lo utiliza, todas sus partes 
se invocan igual. Por ejemplo: se pueden emplear una 
serie de órdenes para examinar un dibujo en pantalla. 
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Gracias a este 
programa, el PCW 
puede realizar todo 
tipo de gráficos en 
pantalla o impresora 
con sencillez, sin 
desmerecer en 
absoluto a sus 
«competidores» los 
CPC. 
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Mundo del 


PCW 


Las mismas, una vez cargado en la memoria el 
driver de impresora, servirán para obtener un hardcopy 
de él. 
El programa que presentamos está escrito en Basic 
y, por tanto, no es particularmente rápido, Sin 
embargo, muestra cómo usar el GSX, y su dibujo en 
pantalla sigue siendo mucho más rápido que la salida 
por impresora en modo de alta resolución, el cual 
puede tardar, y tarda, varios minutos en concluir su 
proceso, En cualquier caso, pensamos que la calidad 
gráfica obtenida compensa con creces la lentitud, 
Después de tecleada y salvarla en disco, se la 
puede usar con GOSUB 2000, La operación gráfica se 
controla mediante una serie de comandos almacenados 
en la variable GSX$, y las coordenadas necesarias en 
el array Points(l, 74), hasta 75 pares de posiciones. La 
coordenada x se encuentra en Points(O,N) y la y en 
Points( 1 , N). 


Tabla I 
Sintaxis de los comandos gráficos 
pantalla 
baja resolución 


BEGIN 


prop (rango de 
coordenadas) 
xy (rango x) (rango) ) 


alta resolución 


END 
CLEAR 
OUTPUT 
DRAW 
PLOT 


(número de puntos) (tipo de línea) 
(número de puntos) (tipo marker) (tamaño 
marker) 
(número de puntos) (sólido) ([rama) 
Mismas opciones que FILL 
Caracteres (xposición) (yposición) (tamaño 
texto) 
(dirección) 
(radio) (xcentro) (ycentru) (línea tipo) 
(opciones FILL) 
(ángulo de comienzo) (número de grados) 
(opciones CIRCLE) 


FILL 
BAR 
TEXT 


CIRCLE 


PIE 


PROGRAMA TESTER 
EXPERIMENTACION CON lOS COMANDOS GRAFICOS 


10 PEI'1 Putina para mtroducir comandos en GSX 
15 esc$=CHP$(27):c 1 s$=esc$+ "[" +esc$+ "P" 
20 PRINT"lntroduzca cadena de ordenes "::INPUT gs:<:$ 
30 IF LEFT$(gs:4C 1 )=CHR$(35) THEN GOTO 100 
50 GOSUEJ 2000 
60 GOTO 20 
90: 
100 PRINT"Numero de puntos ";:INPUT gpn 
110 FOR 1'1=0 to gpn-l 
120'PRINT "Coordenadas ";1'1;" X, V"; 
130 INPUT points(O,n), points( 1 ,1'1) 
140 NEXT 1'1 
150 GOTO 20 
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El array se dimensiona cuando se llama a la 
subrutina, por lo que no se debe usar antes, No use 
Option Base 1, Como en Basic las variables son 
globales, es decir, son «conocidas» por el programa 
principal y todas las subrutinas, es necesario evitar el 
uso de nombres idénticos en aquél a los de éstas, 
La tabla 1 lista los comandos que se pueden enviar 
al sistema gráfico GSX a través de la variable GSX$. 
Las acciones pertinentes se toman por combinación de 
una serie de parámetros, letras y números, 
separados por espacios, no por comas, para no «liar» 
al Basic. Estos comandos se dividen en dos grupos: 
aquellos que controlan el driver de pantalla, impresora 
o lo que sea, y los que producen una salida visible. 
Muchos de los comandos tienen parámetros 
opcionales, los listados en cursiva en la tabla l. 
BEGIN es, a la vez, el comando más complicado e 
importante de los que rigen a los drivers. Descubre 
cuál es el adecuado, y lo carga desde el disco si no 
está presente, ajustando los parámetros, por defecto, 
necesarios e inicializando, 
Para el GSX todos los periférico s de salida son 
análogos y, por tanto, asume que poseen el mismo 
tamaño: 32767 unidades cuadradas, Con este 
tratamiento, surge un claro problema de escala. Para 
entendernos, conseguir que un círculo se vea en la 
pantalla tal cual, no como una elipse, Para ello hay 
dos posibilidades: la orden XY seguida de dos 
números que indican los valores de escala en las dos 


direcciones, La segunda es el comando PROP y un 
único número, que le dice el GSX el rango de escala 
para la dimensión más pequeña del periférico de 
salida. Para la pantalla es su anchura en pixels, y 
para la impresora lo mismo, pero medido en 
caracteres, 
END, Cierra el driver en cuestión ordenadamente. 
Si se estaba usando la pantalla, este comando la libera 
completamente para una salida normal, sin gráficos, y 
devuelve al CPIM la línea inferior de la misma para 
que pueda empleada en la emisión de mensajes, 
CLEAR. Prepara para un nuevo dibujo, Borra la 
pantalla o ejecuta un salto de página en la impresora. 
OUTPUT. Ejecuta todos los comandos gráficos 
pendientes, si existen, N o tiene efecto en la pantalla, 
donde los dibujos aparecen a medida que los 
comandos se reciben, pero el driver de impresora 
almacena todas las instrucciones que se le comuniquen 
y entonces imprime el gráfico en cuestión cuando 
recibe la orden, 
DRA W(N). Dibuja una línea entre los primeros n 
puntos almacenados en el arra y Points. Es posible usar 
diferentes estilos para ellas, con el parámetro estilo, 
con tal que el valor esté comprendido 
entre 1 y 5. 
PLOT(N), Ilumina los primeros n puntos del array 
Points, Los markers que se pueden usar son 
gobemados por un parámetro que oscila de 1 a 5, y 
su tamaño por otro limitado por los valores 1-12, Esta 


2000 IP IDT 61 TBBI GGSUB 3460 
2010 l' 8sd=- THE. RBTUIl. 
2020 DEJI FIlS(oS.b)=LOVERSu.BPTI(aS,b» 
2030 DEI' PlscÚl,s)-IAI(III(saa,,3276'7),O) 
204-0 GOSUB 3230: 8'&.KS-PIlS(g:S(O>.3> 
2050 a
 .ISTR(-begendcleout...d.raplotedUbarcirpls.. 
8 6d ) 
2060 IJI' 8=0 THBI 2100 
2070 a=(a+2)/3 
2060 l' (a()1) UD IOT gb THEJ Pillr -rou aust BBGII 
output devlce-¡: OOTO 3370 
2090 01 a GOTO 2110,2280,2280,2280,2100,2320,2320.2390 
,2320,2480,:l870.3040 
2100 PRllr '"GSI co.JUIIDd Dot recognlsed-¡: GOTO 3370 
2110 g6XS=FIlI(gSn>.2): b=JISTJl(-schllo..g6.K.S) 
2120 IF b=O THBI PRIIT -ID such Graphic Device!-o: OOTO 
3370 
2130 8szS=FIlS(gS(2),2):c= ._SIR (.zyp"- 086:1(1) 
2140 IF (c=O> THRI PIIIT -Iot corrEr" ccordlnate 
6C411a.g-¡: OOTO 3370 
2150 b=(bfU/2: gld=bt19Ub\2) 
2160 goll.(O)=gld 
2170 lJf b=1 THBI SY=-I:gdS=fS:gwS=wS 
2180 8sd(0)=U1T(V.I.UTR(gocl(O») 
2190 SsdU)=Olr(VAIPTlHgoll.(O») 
2200 GOSUB 3170 
2210 sb=-1 
2220 S.c=gpol.(l): s-a=gpo1.(9) 
2230 IP c=1 THRI IF 9<2 TBE' PRlIT -leed 2 SCALR 
factors-¡: GOTO 3370 ELSR gxs= 327671gp(0): 
gys=32167/gp(U: OOTO 2270 
2240 IF Y<1 THBI PRllr "'SCALH factor D88ded!-¡: OOTO 
33Y0 
2250 Rpr= R
(0)a8
(3)/(goIU).8
(4» 
2260 IF gpr>1 THRI gys=32767lgp(O): gxs=gys/gpr IILSE 
Rxs=32767/Sp(0): 8Js=gxslgpr 
2270 RETURI 
2280 IF a"'2 THRI gb=O: IF gY THBI gY=O:gdS=-:gwS=- 
2290 gcl.(O)=a: gcl.(l)=O 
2300 OOTO 3160 
2310 : 
2320 IF y ( 1 TUEI PRIIT -How aany polnt&?-¡:GOTO 3370 
£I..SR gpn=gp(O) 
2330 GOSUB 2820 
2340 l. (Y)U THBI IF a=6 THE' gIt=gpU): GOSUB 2620 
ELSR IF a=7 THRI s-t""SPU):GCEDB 2650 
2350 IF a=? liD y)2 1HEI S.s= gp(2): GGSUB 2680 
2360 IF a=9 liD 6)1 THBI gsd=FIII(gI{l),2): GOSUB 
2730 
2370 gcl.(O)=a: gd(U=gpn 
2380 OOTO 3160 
2390 IP y)2 THBI gt&=gp(2): GGSUB 2530 
2400 IF Y)3 AID £P(3)<>0 TBEI u=gp(3): GOSUB 2560 
2410 scl(O)=8: 8C
(])=I: gpb=1 
2420 gcl.(3)=LHI (U)12 
2430 lJl y)1 THBI gxyl.(O.O)=FI&C(gp(O)"sxs): 
gxySU.o)=FIsc(gp(Uo8Ys) ELSR GC6UB 2820 
2440 gtp=VARPTR (U) 
2450 g
(] )=011 (PBBt <gtP+l )+256.PEBJ: (gtp+2» 
2460 8sd(0)=UJT(VARPTI(gcS.(0») 
2470 OOTO 3110 
2480 IF 6)1 'Hil gS:ll:S=FIII(gIU).2): gpU)=gp(O): 
11/'=11/'+ 1: GGSUB 2130 
2490 gcl.(O)=ll 
2500 8c'lU)=2: gcl.(5)=1 
2510 8pn=2: GGSUB 2820 


2520 roTO 3160 
2530 gcl.(o)=12: gcS(])=1 
zt540 8I:YS(O.o)=0: 8:1ySU.0)=gt&agac 
zt550 OOTO 3160 
2560 gcS(0)=13: gcS(])=O 
2570 l' u ) 4 TREI PRIIT -&Id text Dlrectionr'¡: OOTO 
'33'10 
2580 81u
(0)= (u-UegOO 
2590 810'1.(1)= 100.(u KOO 2)a{2-u) 
2600 gIDS(2)= 100'(1-u IOD 2)U3-u) 
2610 OOTO 3160 
2620 gcS(0)=15: scS(1)=O 
2630 81u'l.(0)"'glt 
2640 OOTO 3160 
2650 gc'l.(0)=18
 RC'I.=O 
2660 gID'I.(O)=gat 
2670 OOTO 3160 
2660 gcS(0)=<19: gcl(1)=1 
2690 8xt=gxy1.(O.o): gxy'l.(O.O)=O 
2700 gyt=gxy1.(1,O): gxy'l<1.0)=gas.s.. 
2710 GOSUB 3160 
2'120 g:lly1.(O.O)=gxt: gxy1.(],O)=gyt: RBTORl 
2130 scS(O)=23: gcS(l)=O 
2740 SI&= IISTR ("'bosopaha- "s&.K.S) 
2750 lP gls=O 1HEI PRI11 -nIega] PILL style-;:GOTO 3370 
BL8E 81s=(g16+1)/2-1 
2'160 81D'I.(O)=gls 
2710 lF gis ) 1 THE' GGSUB 3160 BLSB 3160 
2180 gcS(0)=-24: gcS(l)-O 
2190 IP v)l THEI gf1=gp(]) 
2800 gIDI.(O)=gU 
2810 OOTO 3160 
2820 POR n=O TO gpn-l 
2830 gzyS(O,n)=FIsc(poiDt&(O.D),gJltS) 
2840 gXy'l.<1.u)"'PIsc(poiDt&(].D).gyS) 
2650 IBIT 11. 
2860 RBTURI 
2870 gpn
2: 81==0: 82=11 
2880 IP 11/')0 TREI gr=gp(OJ 
2890 IJI Y)2 THE' gC:II:=gp(]):gcy=gp{2) 
2900 POR n= SI YO 82 
2910 8xy'l.<O.n-g1+1)
Flsc«gcx+gr'gc1(0.(u KOO 
72J»,8 Jt6J 
2920 gxy1.(] .D-Sl + 1 )=Flsc( <gcy+gr'gcl <1. (n XOD 
?2»).gys) 
2930 IBIT u 
2940 gXy'l.(O.o)=gxyS(O,gpu-I): gxy'l<1.0)=sxy'l.(]o8pq-U 
2{150 IJI Y)2 THBI POR q= 3 YO 9: gp(D-2)=gp(D): fin D: 
V'=9-2 
2960 IP s<2 TRE. 3020 
2970 gsd=PllS(gSU),2) 
2980 .=IISTR(-l1U-.gsd): IP .=0 TBEI PRnr "'bad clrcle 
Xooe-: GOTO 3370 
2990 g.a=6+3U.\3) 
3000 6=s-1 
3010 IF s)l THIíI gSU)=SS{2) 
3020 a=S_ 
3030 OOTO 23010 
3040 IP Y(2 THE' PRlIT -Vhat angles far pie sl1ce?-;: 
OOTO 3370 
3050 gl=gp(o)\5 
3060 82=g1+gp(1)\5 
3070 IP y)2 TREJ. POR u= 2 YO y: gp(n-2)=gp(D): IBIT n: 
V'=9-2 ELSR 3110 
30
 IP Y)O THBI gr=gp(O) 
3090 . 


3100 IF 11/'>2 THB. gC:II:=gp(]):gcy=gp{2) 
3110 u=82-g1+2 
3120 gxy1.(O.n)=Flsc(gc.l:08xs) 
3130 gxyl.(].o)=FIsc(gcyo8Ys) 
3140 gpn=n+1 
3150 OOTO 2900 
3160 gsd(O>=UIT(VlIlPTR<gcl.(O»): 
gsd(] )-UlT (VAiFTI (glu'l.(O) J) 
3170 gsx
(2)=UIT(YnPTR(gzys(O.o») 
3180 gsd(3J=UJT<VAiPTR(gol(0»): 
gSJI,'I.(4 )=UIT (¥ARPTR (gpol.(OJ» 
3190 PRIIT gdJ. 
3200 CALL 81 (gd.gsd(OJ) 
3210 PRllr sw5 
3220 RETURI 
3230 6=0: y=O: IF g6d=- 1HEI RliTURI 
3240 VBlLE g6:11:50-- 
3250 IF LEFTS<gsd,U=- - THE' gsxS=llDS<gsxl.2): GOTO 
3250 
3260 gll=-LEFTI (g6.1:1.1 J 
32'10 IF gll=CHRI(34) THRI gs.zS=XIDS<gsd.2) 
gu=Ilsrll(gsd,cHRS(34U:IP gu=O TIIBI PRIlr ..lsslng 
quot.e& fro. teJl:t!-¡: GOTa 3370 IILSE 
U=LEPTI<gsxSo8u-l):gs](S=IIDS(gsd,2):GOSUB 3400 : OOTO 
3340 
3280 gu=IISTR<gsxS.- -) 
3290 IF gu=O THBI gu=LHI <gsxS>+1 
3300 gU=LBFTI(gsd.gu) 
3310 gD=IISTR(-1234561890- o8U) 
3320 IP SP rtiJ gp(Y)=YAL(gts):y=v+1 
3330 IJI SP-O THIíI gS(s)-gU: 6=S+1 
3340 gS:ll:S=IIDS(gsd.gu) 
3350 VEI'D 
3360 RBTDIII 
3370 PIUlr - press auy tey te conUrme.... 
3380 IF IIDTS=- THBI OOTO 3380 
3390 PRIIT: 11210iJ 
3400 ghS=-:IJI ts=- THE' PRIIT tttm:t .lsslng!-;: OOTO 
3370 
3410 POR u= I YO LHJ<U) . 
3420 ghS= ghl + IIDS(U.D.1> + . - 
3430 JBn 11. 
3440 U=ghl 
3450 iETURJ 
3460 .EIDiY BIIEJI-fi 
3470 RBSTOIIB 3480 
3480 DATA. 6BOE.6H73.IHCD.IB05.6H00.6RC!) 
3490 POR 11.=1 TO 6: REJ..D gl: POKE HI'IBI+bo8l: fiIT u 
3500 DU gS51(4),gcSGJ.gloS(9J,g](y"1U,'i'4).go1.(4o\) 
.gpo1(49),gci <1.71 J 
3510 DU goc1<5J.gol1.(9),gSC9).gp(9) 
3520 DlI polotsU,74) 
3530 DATA 1,0.6.10,45.0 
3540 FOR 0=0 TO 5: IEAD goc1.(O): mT 11. 
3550 FOR n= O YO 9: goIS(u)=1 : fiIT 11. 
3560 81=BI'IBI+1: 84=0 
3510 e&eS=CID!:5{27J 
3580 lS=escI+'"I-+esc$i--r+esc.+-H- 
3590 wS=escI+-O-+esc'+'"e-+escl+-J,:-+CHRl(63)+CHRS(32) 
+cKiS(32J+CHRSU20J 
3600 pl=4UUU): gl=-I: ge;6 
3610 gts=l: gIt=I: g.t=l: g.&=1 
3620 sa=pl/36 
3630 POli 11.= O TO 71 
3640 gci(O,a)=CQS(nesa): gc1<1.a)::SII(lI.a8Id 
3650 IBIT o 
3660 IIETURI 
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última opción trabaja sólo en la impresora, 
FILL(N), Conectará los primeros n puntos del 
famoso array con una línea sólida, casi como Draw, 
pero el último punto de dicha línea se unirá con el 
primero, formando un área cerrada que, acto seguido, 
se llenará con una trama de fondo. 
BAR. Es una opción incluida dentro de los drivers 
de GSX, Dibuja una barra rectangular, que puede ser 
llenada con cualquier trama de las disponibles 
mediante la orden Pill. 
TEXT, Permite que el gráfico tenga un título, 
Necesita dos parámetros numéricos: las coordenadas 
de la mitad inferior izquierda y la altura del texto 
(textsize), entre 1 y 12, El texto en concreto, las 
palabras, se pueden incluir en la variable GSX$ 
después del comando inicial en cualquier sitio. 
Alternativamente se puede pasar el texto en una 
variable intermedia, tI, pero si se hace así hay que 
efectuar una llamada GOSUB 3400 antes de GOSUB 
2000, En cuanto a la impresora, es posible controlar 
la dirección del texto con el parámetro direction, 
valores 1 a 4. 
Los comandos que siguen no existen en GSX, Se 
han hecho en Basic. 
CIRCLE. Dibuja un círculo de radio radius, con 
centro en xcentre e ycentre. Se puede dibujar con la 
misma variedad de líneas que en Draw o llenar con las 
tramas de fondo de Fill. 
PIE. Dibuja una parte del típico gráfico de tarta. 


1. Impuestos 


3, Ropa 


Gráfico de tarta ilustrando diferentes tipos de tramas de fondo, 


16 18 20 22 24 26 28 30 32 34 36 38 


Gráfico de barras, de uso común en documentos de negocios. 


Mundo del 
PCW 


Se debe especificar, en grados, el ángulo en el sentido 
contrario a las agujas del reloj, partiendo de la base 
donde la tarta debe comenzar, así como la anchura en 
grados, El resto de las opciones son análogas al 
comando Circle. 


El gran handicap gráfico 
del Basic del PCW ha sido 
ampliamente superado 


El programa Tester sirve para ver cómo funciona 
todo esto, experimentando un poco. Pedirá la entrada 
de una cadena de órdenes. Tecléese basándose en la 
tabla 1 y, al acabar, pulse la tecla Return. Si el 
primer carácter es un espacio, el programa pasará a 
pedir los datos del array Points. 
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Círculos tal y como se ven en la impresora y en la pantalla. 
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Ejemplos de Draw y Plot en diferentes estilos v tamaños. 
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Explosión de 
colores 


Por: Francisco Roelas y 
Marichu Díaz 
Como su nombre indica, la 
ejecución de este programa causa 
en pantalla una progresiva 
inundación de color, Es interesante 
observar el programa para ver 
cómo lo hacen, Los autores nos 
envían la siguiente nota de 
aclaración: 
Se pueden quitar las sentencias 
Print o cambiar éstos por otros (se 


:0 


" '" 


, --- 


entiende, los caracteres), Si se 
eliminan los Print, se verá una 
explosión de puntos de colores. 
Si se alteran éstos por sentencias 
Draw, el efecto en pantalla merece 
la pena vedo. 


, 
f 


lO REM explosion de colores 
20 REM francisco roelas & MARI 
CHU DIAZ 
30 MODE O 
40 ORIGIN 320,200 
SO PR!NT CHR$(23)¡CHR$(3)¡:TAG 
60 PLO'!' 15,15,1 
70 FOR a=l TC 70 
eo PLOT RND(l)ta,RNO(I)t.a,l+RN 
D(1)*12:PRINT"t."j 


90 PLOT RND(l)fa,-RND(l)ta:PRI 
NT"t"¡ 
100 PLOT -RNO(l)*a,-RND(l)ta:P 
RINT"t"; 
110 PLOT -RNO(!)ta,RNO(I)*a:PR 
it.¡r"t"; 
120 NEXT a 
130 TAGOFF:PRINT CHR$(23)¡CHR$ 
(O) j 


Top secret 
Por: Ángel Sánchez Gallego 
Este programa dota a los 
nuestros de una clave de acceso, Si 
el usuario no acierta con la 
correcta al cuarto intento..., 
bueno, no quiero decides lo que 
pasa. 
Para que funcione bien el 
programa (suponemos que el 
usuario, en principio, cumple con 
todos los deberes que su estado 
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legal implica) hay que asignar unos 
valores a algunas variables, 
incluyendo en el programa las 
sentencias de asignación 
correspondientes, Son éstas: 
Long: Número de caracteres de 
la clave. 
Código: Variable alfanumérica 
donde debe ir el código de acceso, 
Por ejemplo, A5B3, 
XXX: A donde debe saltar el 
programa una vez comprobado que 
la clave es correcta (ver listado), 


J 



 


I ON BREAK GOSUB 13:RE" protec 
cion de progra.as 
2 RE" por Angel Sinchez 
3 "DOE 2:LOCATE 10,10:PRINT"In 
troduce la clave de acceso: "¡ 
:p=O 
, cIaS=INKEYS 
S IF p=1 THEN p=O:GDTD 3 
6 IF cla'="" THEN , ELSE 1=1+1 
:PRINT cla'¡:su'=su'+cla':IF I 
=Iong THEN I=O:GDTD 7 ELSE , 
7 IF su'(}'codigo' THEN su'=" 
:GOTD 10 
8 CLS:LDCATE 10,10:PRINT' Brav 
o. Clave Correcta, Acceso auto 
rizado' 
9 GOTD linea:RE" linea debe se 
r un nu.ero correspodiente a I 
a linea que quera,ol decodi1ic 
ar 
10 CLS:LDCATE 10,10:PRINT' Cla 
ve incorrecta. Acceso denegado 
-:a=a+l 
11 IF a(' THEN LDCATE 10,II:PR 
INT-Le quedan:';'-a;' intentos 
':CALL ABBI8:GDTD 3 ELSE CLS:L 
OCATE 10,10:PRINT'Pirata" 
12 IF a=" OR b=S THEN LDCATE 1 
O,I':PRINT'adios':CALL ABB1S:E 
NO 
13 CLS:LOCATE 10,5:PRINT-Eso e 
sta fatal!':b=b+l:CALL ABBI8:I 
F b=5 THEN 12 ELSE p=I:RETURN 


\ 
I 



Láser al habla 


1 
$ 


Por: Antonio Roldán 
¿Alguien se acuerda del primer 
programa de presentación del 
Amstrad que se podía ver en las 
tiendas recién nacido el ordenador? 
Tenía una rutina notablemente 
parecida a ésta y funcionaba casi 
igual de bien que la nuestra 
(modestia aparte), Pero, sin duda, 
lo mejor es teclear el truco y 
maravillarse de que se pueda hacer 
algo así en tan pocas líneas de 
programa, 


_ u 
_----... 
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 . . . 
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10 MOOE l:INK O,O:INK 1,O:INK 
2,24:1NK 3,20:PAPER O:BORDER O 
:PEN 1 
20 LOCA TE 1,25:PRINT"Laser" 
30 PEN :3 
40 LOCATE 20,2S:PRINT CHR$(222 
)jCHR$(2Wj 
50 PRINT CHR$(23)¡CHR$(1) 
60 FOR x=l TO 120 
70 FOR y=16 TO : STEP -1 
80 xl=(4*x)+90:yl=6*y+(200) 


90 IF y{9 THEN c=2 ELSE c=3 
100 IF TESH",y) >0 THEN 60SUB 
130 
11 O NEXT y, X 
120 ENO 
130 FOR n=l TO 2 
140 !'IDVE 318,16 
150 DRA
 
!,y!,2 
160 NEXT:SO
Nr i,Sf,2,lS",2:P 

OT ,y!,c:DRAWR 5,5,c:RETURN 



O REM desiniegracion 
20 REr. por ptm 
30 
ODE l:rNK 
,!S:INK 2 1 20:IN 
K 3,21 
40 
OCATE 2,5:INPUT "Intrcduce 
palabra:H¡palabra$ 
50 palabra$=UPPER$(palabra$) 
60 LOCA TE 2,S:PRINT"para des in 
iegracion pulsa tecla 3" 
70 SYMBOL AFTER 100 
80 SYMBOL 130,24,40,68,34,90,3 
6,66 
90 SY
BQL [31,16,68,40,66,40,6 


\ 
1 


Desintegración 


Por: P&M 
Este programa, aparte de figurar 
en primer lugar en la lista de 
trucos de padre desconocido, 
pulveriza en la pantalla unos 
caracteres consiguiendo un efecto 
de desintegración que ya quisieran 
tener muchos juegos comerciales, 
Es increíble, 


8,3E, 


100 SYM80L 132.0,16,0,36,0,32, 
4,0 
110 SYMBOL 133,0,0,0,0,0,0,0,0 
120 LOCATE lS,15:PRINT palabra 
$ 
130 a$=INKEY$ 
140 IF a$="3" THEN 160 
150 GOTO 130 
160,LOCATE 15,lS:PEN l:PRINT S 
TRING$(LEN(palabra$),CHR$(130i 


17Q FOR n=l TO 200:NEXT 



 


- 


180 
CCATE 15,
5:PE
 2:oRI

 S 
TF!NG$(LEN(palabra$),CHR$(13!: 


190 FCR 1=1 TO 200:NEXT 
200 _O\:AT
 15, lS:PP' 3:PR
NT S 
TR!
G$!
E
(palab
a$) C

$(!32' 


210 
OR 
=t ;0 200:
EXT 


220 LOCA TE 15,!S:PEN 4::PRINT 
STRrNG$(L£N(palabra$)JCH
$( 133 


2:
 FDR 0=1 TD 200:NEXT 
240 
NK 1.24:PEN 4 


. , 
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JUEGOS 


HYDROFOOL 
Una Jlecera 
puede ser 
peligrosa 


Creado por F,T,L. 
Distribuye Zafiro Te!.: 459 30 04 


En la vida, una persona puede verse metida 
en las más extrañas situaciones, La que le ocurrió 
a Sweevo era realmente rara, aunque debemos 
tener en cuenta que nuestro pequeño personaje 
no era precisamente una persona, sino un 
simpático androide, El caso es que Sweevo se vio 
en la difícil tarea de vaciar de agua el planeta 
Deathbowl que, sin razón aparente, se había 
convertido en un gigantesco acuario, El sistema 
para conseguir esto era quitar todos los tapones 
que encontrara en las grutas que los hubiera, 
Aunque esto parecía a simple vista una tarea fácil 
y sin complicaciones, Sweevo descubrió 
rápidamente que esta idea distaba mucho de la 
realidad. Las anémonas, las medusas, las 
lampreas, además de todo tipo de bicho marino, 
se empeñaron en ponerle cuesta arriba su misión, 
¿ N os vamos a quedar cruzados de brazos 
mientras Sweevo arriesga su vida? 
Claro que no, Le ayudaremos a recoger las 
latas de aceite para que no se oxide, además de 
las armas, herraduras de la suerte, y todo tipo de 
utensilio necesario para completar con éxito su 
misión, 
Está claro que el tema de Hydrofool, basado 
en la búsqueda y recogida de objetos, está 
considerablemente visto, pero evidente es también 
las pocas veces que el agua ha sido el marco 
donde se ha situado este tipo de aventura, Este 
ambiente está muy bien reflejado gráficamente, 
con un grado de definición considerable, Los 
colores son variados y están muy bien utilizados. 
El movimiento refleja, acertadamente, la 
sensación de flotación en el agua, además de ser 
gracil y natural. 
Hydrofool pertenece a Faster Than Light 
(FTL), y se puede afirmar que en estas cálidas 
fechas jugado será sumamente refrescante. 
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Originalidad 
Gráficos 


Movimiento 


Sonido 
Dificultad 


Adicción 
V Horrible 
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KINETIK 
Un mundo casi sin gravedad 
Creado por Firebird 
Distribuye Dro Soft Tel.: 255 45 00 
No disponible todavía en España, 



 


Kinetik era un mundo prácticamente 
ingrávido debido a las distorsiones que unos seres 
causaron en su órbita, A partir de ese día, 
desplazarse por su superficie era toda una 
aventura, más si tenemos en cuenta que este 
planeta tenía una flora y una fauna poseedoras 
de especies peligrosas, El simple hecho de salir a 
comprar el periódico, o de ir a por un helado, se 
convertía en un asunto de vida o muerte. La 
confederación galáctica pensó que esto no podía 
seguir así, y decidió enviarte a Kinetik para 
arreglar la situación. A bordo de tu hidronave 
esferoide llegaste al planeta en el que 
rápidamente pusiste manos a la obra, La misión 
consistía en reunir tres letras, para formar un 
mensaje de paz destinado a Kinemator, señor de 
las fuerzas del cosmos, Sólo así volverían a ser 
restauradas las condiciones naturales de Kinetik, 
Estas tres letras estaban distribuidas por las 43 
zonas del planeta, También podrías encontrar 
por éstas unas piezas fundamentales para el 
desarrollo de tu misión, como son: 
- Pantalla deflectora, Protege contra los 
habitantes peligrosos, excepto el ladrón, 
- Dispersor químico, Este arma dispersa a 
los habitantes y, con su ácido corrosivo, taladran 
los muros, 
- Impulsores de control EZ, Anulan las 
fuerzas de gravedad, incluso las de fricción y 
salto del planeta, lo cual permite el movimiento 
normal libre. 
- Impulsores anti-gravedad, Anulan la 
gravedad, 
- Sistema teleportivo, Permite la 
teleportación a cualquier zona, excepto las de 
defensa del Kinemator, 
Como todo medio de transporte, nuestra nave 
consume energía, y ésta puede ser recargada 
sumergiéndonos en cualquiera de los lagos de 
agua que veremos por el planeta. 
Los enemigos que nos acechan por cualquier 
parte del planeta tienen la insana costumbre de 
chupar nuestra energía, Además son inteligentes 
muchos de ellos y nos perseguirán, 
Originalísimo nos ha parecido el tema de 
Kinetik, puesto que, a pesar de tocar el asunto 
de la recogida de objetos, en este caso letras, el 
mundo en el que deberemos realizar esto, es un 
bonito planeta en el que las vegetaciones 
exuberantes, las escondidas cuevas, y las 
construcciones mecánicas, se entremezclan con 
gran acierto y con mejor realización, Los gráficos 


f 


son ricos en color y la definición es muy buena, 
demostrando que se pueden hacer buenos juegos 
en modo uno, El movimiento refleja bien el 
ambiente prácticamente ingrávido del planeta, 
gracias a una dosis de imprecisión en el manejo 
de la bola, 
Kinetik pertenece a Firebird y, aunque 
todavía no está disponible en España, esperemos 
que esté aquí muy pronto, 


Originalidad 
Gráficos 
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RANA RAMA 
Pequeño 
Saltamontes 


Del mundo de la magia y la 
fantasía nos llega un juego ya 
conocido por nuestros lectores, 
entre otras cosas por su 
dificultad: Rana Rama, Por eso, 
porque es difícil, Amstrad 
Semanal proporciona un 
cargador para el juego que nos 
va a dar energía infinita, Se 
acabaron las tribulaciones para 
llegar al final del juego. 
Es necesaria una precaución 
indispensable para introducir este 
cargador: antes de usado teclear 
LOAD" y cargar el programa 
original. Una vez aparecido el 
mensaje READY, teclear y 
ejecutar el cargador, sin mover 
en absoluto la cinta del juego del 
lugar donde se detuvo 
anteriormente. 


/- 


" . 
t., 


I 


-'Ir. 
.... 


t 


:'4'>. 

i? 
CINTA 


10 REM cargador óe cinta para Ranar 
ama 
20 
ODE l:INPUT "Energia infinita ( 
sIn; :",a$:I
 
PPER$(a$)="S. THEN 2 


n=l 
30 MODE l:BOROER O:iNK O,O:LOCATE 


3.12: P RINi vEsper8 
Dr favor H 
40 
EMORY 5000 
50 FOR a=

OOO TD 400i9:READ b:PDKE 
a,b:NEXT a 
60 CALL .!OOOO 


30 AMSTRAD Semanal 



J 


r Ji 



 


70 IF en T
EN DOKE &5E95,O:DOKE &5£ 


96,O:POKE &5E97;O:PQKE &7B68i&
S 


80 CAL
 &5AB5 
90 
A:A G2,50,33, 167,0,205;104, 1BB, 


62,22 , 17,0,128,33 , 0,25;205 1 161,188, 
201 


MONTY AUF 
IEDERSHEN 
El fin 
del principio 


Un juego que culmina, por 
ahora, la saga de Monty, el 
simpático personaje que ya ha 
sufrido un sinfín de aventuras, El 
cargador nos ofrece tres cosas: 
enemigos inmóviles, martillos 
pilones inmóviles e inmunidad a 
los enemigos. Poco más se puede 
pedir. 


CINTA 


iD RE
 Cargador de Auf Wiedershe
1 
Mont.v 
20 MOCE 2:INPUT "EnemIgos inmoviles 


{sIn} :H¡a$:IF UPPER$(a$)=
sn THEN 


POKE 0,0 
30 INPUT "Martillos pilones ¡nmovil 
es (s/n) :",a':I
 UPPER$(a$;= NS" T 


HEN P
WE 1: l' 


40 INPUT "Inmunidad a los enemigos 


(-;/n) 
!r :a$: IF UPPERi(a
.)=J¡:;:i THEN 


Pf1K
 'i.n 
. -..- -,- 


50 POR i=&B040 ID &BCBB:READ a$:PDK 


E i,VAL("&"+a$):NEXT:LDAD". ',&AOOO: 


PDKE &AGBE:&C3:POKE tAú3F,&4C:PGKE 


&A090,O:CALL &8070 


60 DATA 3a J O;v¡b7,20¡9¡32¡22 f ad;32: 
23,ac,32,24;ad,3a¡l,O,b7,20,9,32 J 2b 
¡dd¡32¡2c¡ad¡32 j 2d;ad,3a,2,Olb7}20¡ 
9,32¡3a,ad J 32,3b,dd,32,3c;ad;c3¡O,8 


o 
70 D4!A 21,O,aO.!l,O,1.l,O,4,ed,bO, 
21,4Ú,BO,11,40,O,l,3ú,O,ect,bO,c3,O; 
1 


\
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PALITRON 
Sin problemas 


Vidas infinitas y energía 
infinita nos permite conseguir 
este cargador para el juego 
Palitron, una de esas 
producciones que, por su interes 
y dificultad, no pierden ni un 
ápice de horas gastadas frente a 
ellos tratando de eliminar a los 
insidiosos enemigos que nos 
acechan. 
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CINTA 


10 RE
 Cargador de Palitron 
20 MODE 2: INPUT "Vidas infInitas (s 
In) :",a$: IF UPPER$(a$)="$" THEN P 
D
I O; O 
30 INPUT nEnerqia infinita (sIn) :" 
¡a$:IF ()PPER$(
$)=JlSU THEN porE 1,0 


40 MEMDRY 10000 
50 8GRDER O:
ODE O:FOR i=O TO 15:RE 
AO a:INK i,a:NEXT:LOCATE 3,12:PRINT 
"loadl!1Q PALITRGN":LOAQn";&,1,OOO:FD 
R i=&8900 TO &B969:READ a$:PDKE i,V 


AL{il!t'}+a$}:NEXT:CALL &:39i)(}
DATA 0;2 
6,i3,1
,23,7,5;5i15,14,4.B,i7,16;2, 


50 DATA 21,O,cO,:1;O,40,3e,16,cQ,al 


lb[¡2!;011:il;a
J87;3eJ16;{d;a1,bci 
3e
2'LdJe}bcil1010Jaf,(dI32fbcil,0¡ 


O,3e:l¡Ld¡32 J Dl;21¡O¡cO 


70 DATA 11,e4,23,3e,16,cd,a1,bc,3a, 
0,0;07;20,12;32 1 24;24 , 32 , 25 , 24;32,2 
6;2t;32,27,24i32;28
24;32,29,24i3aj 
i¡O¡b7¡20¡9¡32¡le;34¡32¡lf¡34,32;20 
,34,21,O,cO,11,9c,8c,1,e4,23,ed,bO, 
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Don Quijote 
de la Mancha 


«En un lugar de la Mancha, de cuyo nombre no 
quiero acordarme, no ha mucho tiempo que vivía 
un hidalgo de los de lanza en astillero, adarga 
antigua, rocín flaco y galgo corredor. Una olla de 
algo más vaca que carnero...» 


Creado por Dinamic 
Distribuido por Erbe 
Cinta: 875 ptas. 


Tel.: 314 18 04 
Disco: 2,200 ptas, 


JUEGOS 


L a Mancha, España, abril 
de 1605", 
Eres don Alonso Quijano, 
un hidalgo manchego del 
siglo XVI, cuya debilidad 
son las novelas de caballerías, 
Todo va más o menos bien 
por tu casa, hasta que un día 
tu locura alcanza el punto 
culminante: decides coger las 
armas y salir a correr 
aventuras por la Mancha, 
i Vaya ideas extrañas que 
tiene el hidalgo! Te consigues 
un escudero, Sancho Panza, 
que, aunque no es gran cosa, 
te ayudará en los momentos 
difíciles. A partir de este 
momento entrarás en las más 
increíbles aventuras que te 
puedas imaginar, Ventas, 
colinas, bosques y posadas 
serán testigos de tus más 
locas ideas, tales como atacar 
molinos o enfrentarte a fieros 
leones. 
Tu objetivo final es 
conseguir los amores de 
Dulcinea del Toboso, tu 
dama. Aunque existe un 
primer objetivo que es 
armarte caballero, para poder 
así comenzar tus desventuras. 


Cómo se juega al Quijote 


Don Quijote de la Mancha 
es una aventura gráfico 
conversacional que, a causa 
de su complejidad, está 
dividida en dos partes, Debes 
acabar la primera parte para 
conseguir un código que te 
permitirá jugar en la segunda 
parte. 
Esta aventura consta de un 
complejo sistema de 
reconocimiento de frases, y 
aunque la estructura básica 
que debes teclear es 
verbo + nombre, también 
aceptará y entenderá frases 
separadas por signos de 
puntuación y frases que 
incluyan artículos, 
preposiciones y adverbios, 
He aquí una muestra de lo 
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Solución de la parte I 


¿Cómo salir de lo primero pan- 
talla? 
Leer el libro 
¿Cómo salir de lo coso? 
Abrir la puerta, llevando lo lla- 
ve. 

Dónde está lo llave? 
En lo alacena de lo cocino (4). 
¿Cómo abrir lo alacena? 
Abrir la alacena, llevando 
puesto lo armadura. Luego, 
examinar la alacena y coger 
la llave. 

Dónde está lo armadura? 
Examinar el baúl (3), ponerse 
lo armadura, 
tQué hacer ahora? 
Leer el bando (32) y seguir sus 
instrucciones. 

Dónde están los armas? 
En el comedor de tu coso (7), 
Examinar la pared, coger la 
espada. 

Cómo velar los armas? 
En el patio de lo venta (10) lle- 
vando los armas y uno velo. Y 
luego velar las armas. 


Solución de la parte 11 


Frase de acceso: El inge- 
nioso hidalgo 

Cóm
 salir de lo pantalla 2? 
Dormir. 
¿Qué hacer ahora? 
Has de elaborar el Bálsamo de 
Fierobros. 
Examinar papiro te será de uti- 
lidad. 

Dónde está lo sol? 
I:n el molino (11). 

Cómo entrar 01 molino? 
Entrar al molino cuidadosa- 
mente (precavidamente, cau- 
telosamente, con cuidado) 
(4). 

Cómo coge lo sol? 
Examinar sacos, coger sal. 

Dónde está el romero? 
En lo pantalla 24, coger rome- 
ro. 

Dónde está el aceite? 
En lo pantalla 12. 
¿,Cómo entrar o lo pantalla 12? 
Abrir puerta estando en lo pan- 
talla 34 y llevando lo llave. 

Dónde está lo llave? 
En lo como de lo habitación 16. 
t
ómo coge lo llave? 
Hacer cama. Coger llave. 
¿Cómo entrar en lo pantalla 15? 


tDónde encontrar lo velo? 
En lo escalera de lo posado (17). 
Examinar el candelabro, co- 
ger la vela. 


Modos de conseguir 
energía: 


· Comiendo el currusco de pon 
(pantalla 7). 
· Comiendo el níscalo. Exami- 
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¿Cómo arreglar lo cerradura en 
lo pantalla 9? 
Llevando el martillo, arreglar la 
puerta. 


nar el suelo, arrancar níscalo, 
coger níscalo (pantalla 44). 
· Comiendo lo manzano, Poro 
que caigo del árbol en lo pan- 
talla 43: mover árbol. 
· Comiendo lo gallina que se 
encuentro en lo pantalla 10, 
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Llevando puesto el yelmo de 
Membrino (bocio), 
¿Dónde encontrar lo bocio? 


Modos de conseguir 
comida: 
· Comiendo lo borro de pon 
(11), Examinar pared, exami- 
nar estante, coger pan. 
· Comiendo el bacalao (12). Ir 
o lo pantalla 12, llevando el cla- 
vo (43). Examinar armario, 
abrir armario, coger bacalao. 
· Comiendo los bellotas. Mo- 
ver árbol en lo pantalla 21. 


En el barbero (13) , cantar, o 
silbar, o toser, o estornudar 
poro que el barbero vengo y se 
· Comiendo los moros, Exami- 
nar arbusto, coger moras en 
lo pantalla 25. 
· Si vais muy apurados y lo que 
queréis es ver pantallas, podéis 
beber vino, pero luego no po- 
dréis hacer el Bálsamo. 
· Más vale que no comáis ni lo 
sol ni el aceite, no alimentan y 
sólo sirven poro hacer el Bálsa- 
mo, 
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Cómo morir: 
· Comiendo la amanita phalloi- 
des, 
· Moviendo el árbol dos veces. 
· Escalar el árbol. 
· Velar las armas sin la vela, 
. Dormir mientras velas las ar- 
mas. 
. Luchar dos veces con las ove- 
las. 


· Ir al oeste en la 42, y al sur en 
la 22 y 21. 
· Pasar el acantilado sin haber 
dejado el tablón, 
· Abrir la alacena sin la arma- 
dura, 
· Sin comer. 
· Entrar en la ventana de la pri- 
mera habitación, 


1 


. 
1 


3 
3 
J 


_&.. 



-
_....."..it¡.,.. ."'- 


..r 



' 


......_01".... 


,....,......
...........,.-........ 


'7 
1 


.. .. 
,.. jr
 
 
',;' ¡ 

;' 
"'l<.. 
'''- 
"" 11.. . 
:!: .... 

 ' .J-r 


¿,Dánde está el martillo? 
En el dormitorio de la posada 
(14). Coger martillo. 
¿Cómo entrar en la posada del 
bosque? 
Llamar a la puerta. 
¿Cómo conseguir el vino? 
Luchar contra los odres (16), 
llevando la botella. 
¿Cómo conseguir la botella? 
Atravesando el muro de la pan- 
talla 22, 
¿,Cómo atravesar el muro? 
Veíar pedrusco, subir pedrus- 
co, escalar muro, coger bote- 
lla. 
¿Cómo conseguir el pedrusco? 
Posando el acantilado en la pan- 
talla 45, 
¿,Cómo pasar el acantilado? 
Veíar el tablón, oeste. 
En la escalera de tu casa (5). 
Examinar escalera, examinar 
escalón, coger escalón. 
¿Qué hacer ahora? 
Ir a la pantalla 27, 
¿Qué hacer en esta pantalla? 
luchar contra las oveias, este. 
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deje la bocio, Coger bocio, po- 
ner bocio. 
¿Dónde coger el vino? 


1 -.. .
:= !'-..:...
 
. -
' -..... 
.,,..-..:,,.,.'":;;.......*'......-.,.'
.: 
 __ . ""'.. 1"..- 
"'. jJ ¡ 
 -.. .,..t.=-
 ....- 


---..,
 
 


.........-,...,-..-.....:-11... 


---- 


lo tienes de la parte 1, haz un 
inventario y lo verás. 
¿Dónde hacer e/ Bálsamo? 


En la cueva de Montesinos (41), 
¿Cómo encontrar el caldero? 
Cavar llevando la pala (41). 
¿Dónde está la pala? 
Coger pala (3). 
¿Cómo entrar a la cueva? 
Cantar en la pantalla 42 para 
amansar al león. 
¿Qué hacer con los ingredien- 
tes? 
Echar vino, echar aceite, 
echar sal. echar romero en la 
pantalla 41, 
¿Qué hacer ahora? 
Remover Bálsamo llevando la 
ramita. 
¿Dónde está la ramita? 
En la copa del naranjo (60), 
¿Cómo subir al naranjo? 
Subir o escalar naranio desde 
la pantalla 29. 
? Y ahora? 
8eber Bálsamo para curarte 
de la caída en la pantalla 2, 
¿Ya está? 
Casi, sólo te queda ir a la pan- 
talla 12 y hacer cualquier tonte- 
ría. Vendrá Dulcinea y habrás fi- 
na/izado tu misión, 


Cómo morir: 
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. Entrar molino. Si no pones el 
adverbio una de las aspas te ha- 
ce añicos, 
. Luchar molino. Lo mismo que 
antes, 
. Escalar árbol. Menos el na- 
ranjo, 
. Golpear dos veces la encina. 
. Golpear cualquier árbol. 
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· N, S, E, O, subir estando en 
la copa del naranjo, 
· O en la 42 si no se ha cantan- 
do antes, 
· Cantar dos veces en la pan- 
talla 42. 
· Luchar oveias en la 1. 
· Luchar monies en la 2. 
Nota: los números que apare- 
cen entre paréntesis correspon- 
den al número de pantalla. 
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JUEGOS 
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segunda opción únicamente 
mostrará textos. 
M o Mirar: Con esta 
opción el ordenador 
redescribirá la localización en 
que te encuentras. 
I o Inventario: Esta 
instrucción te dará un listado 
de los objetos que llevas 
contigo, 
Acabar: Reiniciar la 
aventura, 
Ayuda: En algunos casos 
puede ser de utilidad, 
y antes de acabar, 
recordarte que no eres un 
superhéroe y necesitas, como 
todos los mortales, 
alimentarte, Si no efectúas 
esta acción regularmente es 
probable que no te aguantes 
mucho tiempo en pie. 
Para moverte por el juego 
recuerda que has de teclear 
la dirección que quieres ir o 
una abreviación, ir sur o sur 
o S. 
Para las personas que 
entren en el mundo de las 
aventuras con Don Quijote, 
he aquí una lista de verbos 
útiles: examinar, luchar, 
abrir, coger, dejar, poner, 
comer, dormir, y muchos 
más que no te decimos para 
que vayas probando tú 
mIsmo. 
Un dato importante sobre 
este juego es que está creado 
mediante G,A.C. (Graphic 
Adventure Creater), un 
programa que genera 
aventuras conversacionales, 
creado por la empresa 
británica Incentive Software. 
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ESPECIALMENTE PARA ESTE JUEGO 


Al tratarse de un programa conversacional, las valoraciones de Don 
Quijote de la Mancha tienen que ser diferentes al resto. Un aspecto 
crucial es la posibilidad de que el ordenador entienda un lenguaje 
natural, con artículos, adverbios, etc., además de los verbos y sus- 
tantivos. Por supuesto, también deben tenerse en cuenta los gráfi- 
cos que acompañan al texto y la adicción que la aventura produce. 
En cambio, cosas como el movimiento y el sonido pasan a un segundo 
plano. 


Lenguaje 
Gráficos 
Adicción 


V Horrible 


V VVVBueno 


[y][YJ[YJ[YJO 
[y][YJ[YJ[YJO 




O 
V V U n rollo V V V Pasable 


V'VVVVMuy bueno 


que Don Quijote es capaz de 
entender: Examinar la 
estantería, Coger el libro de 
caballerías, Abrir la puerta, 
Bajar la escalera 
rápidamente, Luchar contra 
el molino de viento, Atacar 
al león con la espada. Los 
adverbios servirán para 
especificar cómo deseas que 
una acción sea efectuada, 
Otros comandos que te 
serán de utilidad son: 
Grabar: Graba tu posición 
actual a disco o cinta, Los 
poseedores de Amstrad 6128, 
664, podrán grabar su 
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posición actual en disco, Los 
poseedores de un Amstrad 
464 se tendrán que limitar a 
grabar en cinta, Al teclear 
esta opción el ordenador te 
hará unas preguntas, 
Cargar: Carga una 
posición previamente 
grabada, Funciona como el 
comando grabar, 
Modo: Te permite elegir 
entre jugar en modo gráfico 
o en modo texto. Escogiendo 
la primera opción la aventura 
mostrará junto al texto el 
respectivo gráfico. La 


y finalmente... 
Recuerda que una 
aventura no se acaba en un 
día. Poco a poco irás 
descubriendo nuevas cosas 
que te ayudarán a solucionar 
el juego, 
Don Quijote ha sido 
elaborado teniendo en cuenta 
el relato de Cervantes, 
aunque sin seguido al pie de 
la letra, Por esta razón te 
recomendamos que leas la 
magnífica novela del Manco 
de Lepanto, o mires en la 
televisión la serie que sobre 
este libro se ha hecho, 



-- 
 
1 ... 
r 
, . r 
, . 
. . 
( ljl '" tjl 
. 
I · 
\ , 
, r r . #1 1. a 
," 
. 


,¡; 


e rear imágenes en una pantalla siempre 
es un desafío a la imaginación, a la creatividad 
y a la peripecia programando, Por todo 
ello, AMSTRAD Semanal organiza 
entre todos sus lectores un concurso de distño 
gráfico sujeto a las bases que se detallan más 
aba J 'o. 
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Bases del concurso 
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1. Entran a concurso todos los Amstrad 
CPC, PCW y el PC, 
2. Se establecen tres categurías distintas 
dentro del concurso, cada una de ellas 
correspondiente a cada uno de los ordenadores 
citados en el punto 1, Hemos elegido este método 
para que ninguno de los concursantes se 
encuentre en desventaja debido a que las 
capacidades gráficas de su máquina sean menores 
que las de otro modelo Amstrad. 
3. El concurso se refiere solamente a diseños 
gráficos efectuados en pantalla, aunque no 
importa el método escogido para generados, Es 
posible cmplear cualquiera de los programas de' 
diseño gráfico comerciales que existen, así como 
crear la imagen empleando un programa en Basic 
o Código Máquina. 
4, Las imágenes se enviarán a nuestra 
redacción en cinta o disco, y pueden ser un 
programa Basic que las genere, un bloque de 
bytes o el método que se considere más 
adecuado, teniendo en cucnta que el jurado que 
elija los ganadores sólo considerará lo que se vea 
en pantalla a nivel gráfico: ni sonido, ni 
animación. 
5. El jurado, wnstituido pur profesionales del 
diseño, ilustración y programación, observará 
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cada una de las pantallas durante el tiempo 
necesario y mediante los métodos que estime más 
oportunos, seleccionando los ganadores, Su 
decisión será inapelable, 
6. El plazo de recepción de las pantallas 
finalizará el día 1 de septiembre de 1987. 
7. Ninguno de los diseños enviados se 
devolverá al remitente. AMSTRAD Semanal se 
reserva los derechos de publicación de los mismos 
en el momentO y condiciones que estime 
oportunos, citando a su autor. 
8, Los ganadores se harán públicos en la 
segunda quincena del mes de septiembre de 
1987, a través de la revista AMSTRAD Semanal. 
9. En total, se entregarán nueve premios, dos 
por categoría. Los primeros serán los siguiente,: 
Amstrad CPC: UN DIGIT ALIZADOR DE 
VÍDEO 
Amstrad PCW: TABLETA GRÁFICA 
GRAFPAD 
Amstrad PC: TABLETA GRÁFICA 
GRADPAD.5 
y los segundos, dos para cada categoría, serán 
unas excelentes cadenas musicales alta fidelidad y 
estéreo, 
10, El simple hecho de participar en el 
concurso presupone la aceptación incondicional 
de sus bases, 
Nuestra dirección es: 
AMSTRAD Semanal. 
Carretera de Irún, km, 12,400. 
28049 Madrid. 
REFERENCIA: CONCURSO GRÁFICO 
AMSTRAD SEMANAL. 
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PRESUPUESTOS 


de Informática Grotur S,A. 
p, V.P,: 18.600 ptas, 
Presupuestos es un programa 
de gran utilidad para todas las 
empresas que deseen almacenar 
los presupuestos de los artículos 
con los que trabajan y 
confeccionar las 
correspondientes facturas, que 
pueden ser impresas con las 
correcciones que consideren 
convenientes los usuarios, 
Este programa de fácil 
manejo está pensado para que 
se pueda seguir con las 
instrucciones de pantalla, no 
obstante es imprescindible 
aclarar una serie de cuestiones. 
Cuando sea la primera vez que 
se utilice el programa hay que 
iniciar el disco de ficheros. Para 
ello se carga en memoria la 
cara A del programa, se 
introduce un disco formateado o 
bien la cara B del disco de 
Presupuestos. Se elige la opción 
6: crear ficheros, y el programa 
advierte de la creación del 
fichero para comenzar a 
trabajar. 


Orden de trabajo 
Al principio sólo se 
introducirán los datos de la 
empresa o bien se modificarán. 
Seguidamente hay que dirigirse 
a la opción 9 y almacenar los 
correspondientes artículos según 
instrucciones. 


Movimientos por campos 
y salida a menú general 
Para saltar de campo en 
sentido normal de petición de 
datos, se pulsará Return, Si lo 
deseado es desplazarse a un 
campo que ya ha sido aceptado, 
se pulsará el "0,, del teclado de 
números. 
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SOFTWAR 
PCW 


El regreso al menú principal 
se hace desde la primera 
petición, y el procedimiento 
empleado será mantener pulsada 
AL T mientras se hacen tres 
pulsaciones en el ,,0". 


Nuevo disco: 


Si en cualquier momento se 
quiere iniciar un nuevo disco de 
ficheros, primero debe 
formatearse y luego seguir las 
instrucciones generales 
expuestas en pantalla. 


Datos de la empresa 
Con la opción de Introducción 
de datos utilizada en la aplicación 
del programa por primera vez, 
se introducen los datos de la 
empresa que aparecerán siempre 
en las cabeceras si el usuario lo 
desea. 
También es posible modificar 
posteriormente los datos de la 
empresa con otra opción 
específica. 


Presupuestos 
En la opción de Creación de 
presupuestos, el programa 
preguntará por qué número de 
presupuesto quiere comenzar. 
Seguidamente pedirá los datos 
del cliente al cual se pretende 
realizar el presupuesto. 
Los datos aceptados son 
inmodificables y el presupuesto 
se considera desde ese momento 
creado. Sólo son necesarios los 
cuatro primeros números de 


código de artículo, la cantidad 
presupuestada y el tipo de 
precio aplicable. 
Se incluye una opción de 
lectura aconsejable de ser 
utilizada antes de dar de baja 
un asiento del presupuesto 
entero. 
También se cuenta con la 
posibilidad de modificar las 
cantidades y el tipo de precio de 
los correspondientes apartados 
del presupuesto y dar de baja 
un aSiento. 
Respecto a la opción de 
Creación de ficheros, se utilizará 
cada vez que se emplee por 
primera vez un disco de 
ficheros, 
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Listado 


Se podrán confeccionar las 
listas de precios a discreción, así 
como imprimir los presupuestos 
y facturas, con la posibilidad de 
elegir el IV A a cobrar. 


Artículos 


La opción de artículos nuevos 
sirve para la introducción de los 
mismos con el código 
correspondiente, descripción, 
tres tipos de precios, etc. 
Es importante la codificación 
de artículos de forma cómoda y 
útil para el usuario. 
El programa incluye una 
opción de Lectura y consulta de 
artículos almacenados. 
Puede utilizarse en cualquier 
momento la opción de 
Modificación de precios, 
descripciones, etc., así como dar 
de baja los artículos de los que 
se prescinda. 


Consejos y observaciones 
Si se consigue una buena 
codificación numérica, la opción 
de Listado de precios y artículos 
será aprovechada en toda su 
amplitud. 
Se observa que en cada 
artículo se da opción a 
introducir el nombre del 
capítulo. Esto se debe a que el 
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usuario puede introducir varios 
títulos para un mismo capítulo, 
de forma que en el listado de! 
presupuesto aparecerá aquel que 
posea e! primer artículo que se 
introduzca en cada capítulo, 


CONTABILIDAD 
GENERAL 2 


..,. 


de RFA Systems Ine. 
P. V,P. (8256): 19,600 ptas. 
P, V.P. (8512): 21.840 ptas. 
Este programa de 
contabilidad está de acuerdo con 
e! Plan General Contable 
Español (PLACON) y reúne las 
características necesarias para 
gestionar la contabilidad de 
cualquier pequeña o mediana 
empresa. 
Si se dispone de un PCW 
8512 o de un PCW 8256 
ampliado con la segunda unidad 
de disco, el programa alcanza la 
capacidad de 4,000 cuentas con 
asiento y movimientos 
ilimitados, 
El programa está realizado en 
lenguaje M-Basic, compilado 
posteriormente para mayor 
rapidez de ejecución, 



 


Características generales 
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Contabilidad general 2 
puede disponer de hasta 96 
conceptos auxiliares que e! 
usuario crea a su gusto. 
Previamente a su utilización, 
se debe configurar e! programa 
para su funcionamiento con 
una, dos o tres unidades de 
disco; tanto los niveles como los 
dígitos por nivel y cuenta son 
programables por el usuario, 
Un detalle a tener en cuenta 
es que incluye una calculadora 
para realizar operaciones sin 
necesidad de salirse de la 
aplicación. 
Es de destacar que en 
configuraciones ilimitadas no 
hay pérdida de apuntes 
contables. 
En el caso de producirse 
cortes energéticos o desconexión 
involuntaria del ordenador sólo 
se ocasiona una pérdida mínima 
de datos. 
Como dos últimas 
características importantes 
están, en primer lugar, la 
posibilidad de corrección de 
artículos en cualquier momento 
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y, en segundo lugar, e! 
tratamiento específico de! IV A, 
advirtiendo en cualquier caso dI:' 
la cercana saturación de los 
ficheros de datos. 


Apartado de cuentas 
El programa dispone de un 
tratamiento programable de 
grupos y subgrupos de cuentas, 
además de la posibilidad de 
creación automática de cuentas 
de nivel. 
El menú contiene una serie 
de opciones: altas, bajas, 
consultas, modificaciones, 
listados, etc. 


Apartado de asientos 


Dentro del tratamiento de 
asientos, permite la 
contrapartida directa, así 
como la confirmación de 
cuentas por descripción en e! 
caso de contar con un PCW 
dotado de dos o más unidades 
de disco. 
Asimismo se dispone de una 
opción para el cuadre por 
asientos, pudiéndose realizar el 
trabajo en tiempo diferido. 
El menú de apartado de 
asientos incluye la introducción 
de asientos, modificaciones y 
consultas. 


Diario de movimientos 


Contabilidad general 2 
clasifica los diarios de 
movimientos: 
Diarios consultas: destaca la 
posibilidad de obtención del 
último diario sin modificación 
de ficheros, 
Diario difinitivo: para la 
actualización de los datos 
contables haciendo definitivos 
los asientos de dicho diario. 
Diario retrospectivo: I:'n el caso 
de datos ilimitados o de no 
haber sobrepasado los límites de 
la configuración actual, se podrá 
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obtener el diario de cualquier 
día del ejercicio. 


Listado, cierres y aperturas 


El programa proporciona 
listados de cuentas, conceptos, 
fichas dI:' Mayor, fichas de 
detalle, libros de registros, 
relación dI:' IV A, cobros, pagos, 
balances programables, etc 
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Necesitamos personas 
que conozcan 
profundamente el 
Amstrad PCW a nivel 
de Basic, Lenguaje 
Máquina y Locoscript. Se 
valorarán conocimientos 
de CP/M. Si usted es una 
de estas personas, 
póngase en contacto con 
nosotros rápidamente en 
la dirección que se indica 
a continuación, poniendo 
en un lugar muy visible 
del sobre: 
Referencia PCW 
AMSTRAD Semanal. 
Nuestra dirección es: 
AMSTRAD Semanal. 
Carretera de Irún, km 
12,400. Fuencarral. 
28049 Madrid. 



CONCURSO 
MUSICAL 
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Sweet Georgia Brown 
Por: SilverÍo MacÍas I 


El ritmo y la armonía de la 
composición que nos manda 
Si1verio Macías dan como resultado 
un conjunto bastante agradable de 
escuchar. Le damos la enhorabuena 
por los magnífícos radiocascos 
que recibirá. 


1 . 
3 . 
5 ' 
7 . 
10 OEFINT a-s:OI" [(72),b(16),d(16) 
,t(16),h(16):50UNO 7,0,26,0 
20 FOR j=O TO 12:REAO [(j):NEXT 
30 FOR j=13 TO 72 
40 [(j)=[(j-12)/2 
50 NEXI 
60 "OOE I:PAPER O:PEN I:INK O,O:INK 
1,26:BOROER 0:CL5:LOCATE 11,12:PRI 
NT.SWEET 6EORGIA BROWN.:LOCATE 11,1 
3:PRINT STRING$(19,208):LOCATE 1,1 
70 ENV 1,3,5,1,1,0,7,3,-5,I:ENV 2, 
3,5,1,2,-I,I,I,O,18,3,-4,I:ENV 3,1, 
o, 13:ENV 4,I,15,l,I,O,12:ENV 5,1,0, 
26:ENY 6,I,15,I,I,O,7,5,-3,I:ENV 7, 
1, 15,1,1,0,12 
80 GOSUB 180:GOSUB 180:ENV 4,3,5,1, 
2,-I,I,I,O,8:ENV 6,1,13,1,1,0,10,2 
-6,I:ENY 7,I,13.1,I,O,12:GOSUB 180 
90 ENV 4,I,15,1,I,O,12:ENV 6,1,15,1 
,1,0,7.5,-3,I:ENV 7,I,15,1,I,O,12:R 
ESTORE 460:GOSUB 180 
100 ENV 1,3,5,1,1,0,10,3,-5.1:ENY 
2,3,5,1,2,-I,I.1,O,24.3,-4,I:ENV 3. 
I,O,16:ENV 4,1.15,1,I,O,15:ENV 5,1, 
0,32:ENV 6,I,15,1,I,O,10,5,-3,I:ENV 
7,1,15,1, 1, 0,15 


38 AlvlSTRAD Semanal 


110 RESTDRE 630:605U8 180:ENY 1,3,5 
,1,I,O,13,3,-5,I:ENY 2,3,5,1,2,-1,1 
,I,O,30,3,-4,I:ENY 3,I,O,19:ENV 4.1 
,15,1,I,O,18:ENV 5,I,O,38:ENV 6,1,1 
5,1,I,O,13,5,-3,I:ENV 7,1,15,1,1,0, 
18 
120 GOSUB 180:ENV 1,3,5,1,1,0,19,3, 
-5,I:ENY 2,3,5,1,2,-1,1,1,0,42,3,-4 
,1:ENV 3,I,O,25:ENV 4,1,15,1.1,0,24 
:ENV 5,I,O,50:ENV 6,1,15,1,1,0,19,5 
,-3.1:ENV 7,I,15,I,I,O,24:G05UB 180 
130 SOUNO 49,[(25),25,15:S0UNO 28,[ 
(29),25.15:50UNO 42,[(32),25.15:S0U 
NO 7,O,25,O:RESTORE 640 
140 ENT-l,I,O,6,I,2,6,I,-3.6,1.1,6: 
FOR j=1 TO 10:REAO a,d 
150 SOUNO 2.[(a),19*d,15,O,I:NEXT 
160 SOUNO 49,[(25).133.15,0,I:S0UNO 
28,[(29),133,15,0,I:S0UNO 42,[(35) 
,133,15,O,I:FOR 0=1 TO 6000:NEXT 
170 ENO 
180 REAO 11:IF 11=-1 THEN RETURN 
190 READ pl,ql,rl 
200 sl=2-3*(ll=0):s2=2-3*(pl=0):s3= 
2-3*(ql=0):s4=2-3*(rl=0) 
210 REAO a:r=I:FOR j=1 TO a 
220 READ b(j),d(j) 
230 FOR n=1 TO d(j) 
240 f(r)=b(j) 
250 IF t(r)=O THEN h(r)=3:GOTO 280 
260 IF d(j)=1 THEN h(r)=I:GOTO 280 
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270 IF n=1 THEN h(r)=4 ELSE IF n=d( 
j) THEN h(r)=6 ELSE h(r)=7 
280 r=r+l:NEXT:NEXT 
290 REAO a:r=I:FOR j=1 TO a 
300 REAO b(j),d(j) 
310 FOR n=1 TO d(j) 
320 f1<r)=b(j) 
330 IF fl(r)=O THEN hl(r)=3:GOTO 36 
° 
340 IF d(j)=1 THEN hl(r)=I:GOTO 360 
350 IF n=1 THEN hl(r)=4 ELSE IF n=d 
(j) THEN hl(r)=6 ELSE hl(r)=7 
360 r=r+l:NEXT:NEXT 
370 SOUND 49,[(ll),O,O,sl:50UNO 42, 
[(f(I».O,O,h(I):SOUND 2,[(f(2»,O, 
O,h(2):SOUNO 28,[(fl(I»,O,O,hl(I): 
SOUND 4,c(fl(2»,0,0,hl(2) 
380 SOUND 1,[(pl),0,O,s2:S0UNO 2 , [( 
f(3»,O,O,h(3):50UNO 2,c(f{4».0,O, 
h(4):SOUND 4,c(fl(3»,0,0,hl(3):SOU 
ND 4,c(fl(4»,0,0,hl(4) 
39050UNO 1.[(ql),O,0,s3:50UND 2,[( 
f(5»,0,0,h(5):SOUNO 2,c(f(6»,O,O, 
h(6):SOUND 4 , c(fl(5»,0.0,hl(5):SOU 
ND 4,c(fl(6»,0,0,hl(6) 
400S0UNO 1,[(rl),O,O,s4:50UNO 2,[( 
f(7»,O,O,h(7):SOUNO 2,c(f(8»,O,O, 
h(8):50UND 4,[
fl(7»,O,O,hl(7):50U 
NO 4,c(fl(8»,O,0.hl(8) 
410 60TO 180 
420 DATA 0,956,902,851,804,758,716, 
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676.638.602.568.536.506 
430 DATA 0..25.,1,,8.1,,8,24,.23.,1 
..8,1..8,22.29.22,29,4,34.2.36,2.38 
,2.34,2,1.,8,22,29.22.29.4,41,2.38, 
1.43,2.41,3,1..8.22,29,22,29,4.46,2 
,,1,41,2,38.3,1,,8,22,29,22,29,4,34 
,2,,3,34.1,.2,1,,8.19,27,19,27,4.34 
,2,36,2,37,2,34,2,1,,8 
440 DATA 19,27,19,27,4,41.2,37.1,43 
.2.41,3.1..8.19,27,19,27.4,46,2,.1, 
43.2.41,3,1,.8,19,27,19,27,4,37,2" 
3.34,1,,2.1,,8,20.27,20,27,4,32,2,3 
4,2,36,2,32,2,1..8.20.27.20.27.5.39 
,2,36,1.41.1.,1,39,3,1,,8,20,27,20. 
27.4,44,2,,1.39,2,36.3,1.,8 
450 DATA 20.27,20,27,6.32,2,,1.32.1 
,34,1.32,1.34.2,1,,8,25,29,20,29,3, 
41.2..3.37,3.2,37,2,,6.25,29,20,29, 
6,37,2,,1,32,1,34,1,32,1,34,2.2.32. 
2,.6,25.29.20.29,3,41.2..3,37.3.2,3 
7.2,.6,17.29,17,29,5.32.1,33,2,41.2 
.39,2,36.1.1..8 
460 DATA 22.29.22,29,4.34,2.36.2.38 
.2,34,2.1,,8,22,29.22,29,5,41,2,38, 
1,43,1,.1.41,3,1,,8,22.29.22,29.4,4 
6,2.,1.41.2,38.3,1,,8.22,29,22.29,5 
,34.2.,3,34.1,,1.34,1,1.,8 
470 DATA 19,27.19.27,4.34,2,36.2,37 
,2.34,2.1..8,19,27.19.27,5.41.2,37, 
1.43.1..1,41,3,1,,8,19,27,19,27,4,4 
6,2.,1,43,2,41,3,1,,8,19,27,19,27.5 
,37,2,,3,37,1,,1.32.1,1,,8,22.29,22 
,29.4,34.2.41.2,,1,41,3,1,,8,17,29, 
17,29,7.39,2,36,1,41,1.,1,33.1,,1,3 
2,1,1..8 
480 DATA 22,29.22.29,4,34.2,41,2..1 
,41,3.1.,8,17,29.17.29,5,39,2,36,1. 
41,1,,1,33,3.1.,8,25,25.24.23.5,32, 
1,32.1,34,2,37,2,41,2,1,,8,22,29,22 
,29,5,44.2.45.1,46.1,,1,44,3,5.38,2 
,38,1,38,1,,1,38,3.19.27,20,27,6,43 
,1,43,1,,2,42,1,42,1,,2,6,37,1,37.1 
..2.36,1 
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490 DATA 36.1.,2,25,25,24,23,3,37,1 
,37,1,,6,3.32,1.32,1,.6,-1,22,29,22 
,29,5,46,2..1,46,1.,1,48.3,4,34,2,3 
6,2,38.2,34,2,22,29.22,29,4,48.2.,1 
,46,2,44,3,4,41,2.38,1,43,2.41,3 
500 DATA 22,29,22,29,4,.2.46,2,,1.4 
5,3.4,46,2,,1,41,2,38,3,22.29,22,29 
,5,46,2,,1,44,2,,1,41,2,4,34,2,,3.3 
4,1,,2,19,27,19,27,5,46,2,,1,46.1., 
1,48,3,4,34,2,36.2,37,2,34,2 
510 DATA 19,27.19,27,5,48,2,,1,46,2 
,,1,44,2,4,41.2,37,1,43,2,41.3,19,2 
7,19,27,4,,2,46,2,,1,45,2,4,46,2,,1 
,43,2,41.3,19,27.19,27,6,46.2,48,1, 
46,1,,1,48,1,46,2,4,37,2,,3.34,1,,2 
520 DATA 20,27,20,27.4,44,2.44.2,,1 
.46,3,4,32,2,34.2,36.2.32,2,20,27,2 
0,27.5,46,2,.1,44.2,,1,41.2,5,39,2. 
36,1,41,1,,1.39,3,20,27.20,27.4..2. 
44,2.,1,46,3,4,44,2..1.39,2,36.3 
530 DATA 20,27,20,27,6,44,2,44,1,46 
,1,,1.44,1.46,2,6,32.2,,1,32,1,34,1 
,32,1,34,2,25,29,20,29,5,49,1.49,1. 
46.2,44,2,40,2.3,41,2,,3,37,3,25,29 
,20,29,5,39,1,37,1,34,2,37,2,37,2,6 
,37,2,,1,32,1,34.1,32,1,34.2 
540 DATA 25,29.20,29,5.32,1,32.1,32 
,2,34,2.35.2,3,41,2.,3.37,3.17,29,1 
7,29,4,36,2,,2,36,2,,2,5,32,1,33,2, 
41,2,39,2,36.1.22,29.22.29.4.,2,53, 
2,,1,52,3,4,34,2,36,2,38.2,34,2 
550 DATA 22,29,22,29,5.53,2,,1,54,2 
,,1,53,2,5,41,2,38,1.43,1,,1,41,3,2 
2,29,22,29,4,,2,53.2,,1,52,3,4,46,2 
,,1,41,2,38,3,22,29,22,29,6,53,2,52 
,1,53,1,,1,52,1,53,2,5,34,2,,3,34,1 
,,1,34,1 
560 DATA 19,27,19,27,4,.2.51,2.,1,4 
8,3.4.34,2,36,2,37,2,34,2,19,27.19, 
27.5,51.2,,1,48.2,,1,46,3,5,41,2,37 
,1.43.1,,1,41,3,19,27,19.27,4,,2,53 
,2,.1,53.3.4.46,2.,1.43,2,41.3 
570 DATA 19,27,19,27,6,51,2,53.1.51 
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,1,,1,53.1,51,2,5.37.2,.3,37,1,,1,3 
2,1,22.29,22,29,4,49.2,49,2,,1,46,3 
,4,34,2,41,2.,1.41,3.17.29,17.29,5, 
53,2.,1,51,2,,1.53,2.7,39.2.36,1.41 
.1,,1,33,1,,1,32,1 
580 DATA 22,29,22,29,4,49,2,49,2,,1 
,46.3,4,34.2,41,2.,1.41.3,17.29,17, 
29,5,53,2,,1,51,2,53,1,51,2,5.39,2. 
36.1,41.1,.1,33,3,25,25,24.23,4,49. 
2,49,2,48,2.47,2,5,32,1,32,1,34,2,3 
7.2,41,2 
590 DATA 22,29,22,29,5.46,2,,1,44.2 
,.1.46.2,5.44.2,45,1.46.1.,1,44,3,1 
9,27,20,27,5,41,2,,1,44,2,41,1,39.2 
,6,43,1.43,1,,2,42,1,42,1,,2.25,25, 
24,23,2.37.2,,6,3,37,1,37,1.,6 
600 DATA -1,29",,4,10,2,10,2,14.2, 
17,2,2,26,2"6",,,4,20,2,19,2,17,2 
,14,2,1"8,29,,, ,5,10,2,10,1, 10,1, 1 
4,2,17,2,2,26,2"6,,.,,4,20,2,19.2, 
17,2,14.2,1"8,22,,,,4,15,2,15,2,17 
,2,18,2.2,31,2..6 
610 DATA 0",,5,19,2.18,1,17,2,16,1 
,15,2.1"8,22,,,,5,15.2,15,1,15,1,1 
7.1,18,3,2,31,2"6",,,5,19,2,18,1, 
17,2,16,1,15,2,1"8,24,,,.4,8,2,10, 
2.11,2,12,2,2,27,2.,6.",.4,18,2,17 
.2,15,2,12,2,1,.8,24",,5,8,2,10,1, 
11,2,8.1,12,2,2,27,2,,6 
620 DATA 0",,4.18.2,17,2,15,2.12,2 
,1..8,20,.,.4.13,2,15,2,16,2,17,2,2 
,29,2"6,,,.,4,23,2,22,2,20,2,17,2, 
1,,8.20.,.,4,13,2,15,1.16,2,17,3,2, 
29,2"6,21,,,21,4,5,2,6,2,7,2,8.2,3 
.24,2,,4,24,2,-1 
630 DATA 25.25,24,23,5,32,1.32.1,34 
,2,37,2.41.2,1.,8,-1,22,29,22,29.5, 
44,2,45,1,46,1,.1,44,3,5,38,2,38,1, 
38,1,,1,38,3.-1.19,27,20,27,6.43.1, 
43,1,,2,42,1,42.1,,2,8,37,1,37,1,.1 
,20,1,36.1,36.1,,1,20,1,-1 
640 DATA 32,,6,34,.6,37,,8,40,1.7,3 
7,,5,34,1,32,1,37,1,5,32,,5,34.1,5 
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Esta sección está dedicada a todas las wmpras, ventas, clubs de 
umarios de Amstrad, programadores y, en general, cualquier clase de 
anuncio que pueda servir de utilidad a los lectores Todo aquel que lo 
desee puede enviamos m anuncio, mecanografiado, . HOBBY 
PRESS, S. A, AMSTRAD Semanal. Apartado de Correos 232 
Alcobendas. Madrid. 
¡ABSTENERSE P1RA TAS! 


Cambio juegos, todos 
funcionan perfectamente, 
grabados en disco nuevu pur 
primera vez, Absuluta seriedad. 
Escribir a: Francisco Fuentes. 
Pintada Baja, 21, 23440, Baeza, 
o llamar por tel.: (953) 7401 94 
de las 4 de la tarde hasta las 12 
de la noche, 


. . . . . . . . . . . . . . 


Vendo la colección completa 
de Video-Easic, que comprende 
20 lecciones de Basic para 
aprender con el Spectrum, La 
colección completa consta de 20 
cintas y 20 fascículos 
explicativos, al precio de 8,000 
ptas. También vendo las 13 
cintas que se publicaron de 
Microhobby-Cassette al precio de 


2.600 ptas., Trans Express 
(programa copiador) al precio 
de 1.000 ptas., y el juego 
Hypersport por 500 ptas. Todos 
para Spectrum 16 K, 48 K, 
Plus, Mi dirección es: Manuel 
Montilla Valverde, Ámbar, 6, esc. 
dcha, 3. o A. 28021 (Madrid), 
Te!: 798 02 82. También cabría 
la posibilidad de cambiar todo 
esto por programas para 
Amstrad. 


. . . . . . . . . . . . . . 


Intercambio programas para 
ordenadores Amstrad en 
cassette y disco, Prometo 
contestar a todos los que 
enviéis, Mi dirección es: Javier 
Pérez Estabén. Juan Bautista, 13, 
1, o izqda. Aguilar de Campoo. 


Mercado 


COvIÚN 


34800 (Palencia). o bien llamar 
al tel.: (988) 12 27 46, a partir 
de las 11,30 h hasta las 14 h. 


. . . . . . . . . . . . . . 


Vendo ordenador T exas 
Instruments TI-99/4A (a 
estrenar) y algunos programas 
en cartucho para este 
ordenador. Tel: (911) 22 95 64. 
Preguntar por Felipe. 


. . . . . . . . . . . . . . 


Albaclub-Amstrad, En él 
encontrarás todos los programas 
que andabas buscando, así 
como ayuda en la 
programación, corrección o 
confección de listados de 
programas en Basic o Pascal, 


I 


. 


"Sábado Chip", de 17 a 19 h. 


> 
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Bases de datos, procesado res de 
texto, diseñadores, gestión, 
utilidades, copiones, juegos", y 
toda la información que 
necesites para introducirte en el 
mundo de la informática en 
software y hardware, 1.500 
programas a tu disposición, 
usuario de Amstrad CPC, 
PCW u PC, IBM. Libros, 
revistas nacionales y 
extranjeras. Albadub-Amstrad, 
p, o Cuba, 30, 3. o O, 02005 
(Albacete) , 


para ordenador CPC-464 por 
un monitor en color para el 
CPC-464, pagando la diferencia 
justa, Interesados llamar al te!.: 
2 82 47 de Málaga y preguntar 
por Antonio, 


Bearing, Winter Sports, 3D 
Tenis..., etc. Interesados 
escribir a: Gerardo Losada, Urb, 
Can Raimi, 12 bis, Te!.: (93) 
797 20 47, Argentona 08310 
(Barcelona) . 


. . . . . . . . . . . . . . 


. . . . . . . . . . . . . . 


Vendo o cambio por otros 
programas, compiladores de los 
lenguajes Pascal y Cobol para 
PCW y compatibles IBM. 
Llamar al te!.: (91) 473 96 57, 
Preguntar por Juan Francisco. 


Compro ampliación de 
memoria DK , Tronics de 64 K 
con su correspondiente disco de 
CPM Plus, También compraría 
un joystick con dos disparos que 
funcione, Cambio por otros 
juegos, copiones o utilidades, 
juegos en disco. Interesados 
e!,cribir a: Javier Fernández 
Alvarez. Pérez Ayuso, 19, 28002 
(Madrid) o bien llamar al te!.: 
(91) 415 5845, 



 


. . . . . . . . . . . . . . 


. . . . . . . . . . . . . . 


Desearía intercambiar con 
usuarios de todos los CPCs de 
Amstrad juegos y utilidades, 
Estoy especialmente interesado 
en conseguir The Great Escape, 
Interesados escribir a: Juan 
Pablo Gómez. Cardenal 
Monescillo, 19, 4, o A, 13003 
(Ciudad Real). 


Club de usuarios del PC y 
compatibles, de Barcelona. Se 
cambian o venden toda clase de 
programas para PC y 
compatibles, Tanto de gestión 
profesional, como de juegos. 
Interesados llamar al tel,: 
235 59 52 de Barcelona, y 
preguntar por Jaime o al te!.: 
258 59 69 de Barcelona, y 
preguntar por Carlos, 


. . . . . . . . . . . . . . 


Desearía cambiar el juego 
3D Gran Prix, por cualquiera 
de los siguientes juegos (en 
cinta): Arkanoid, Xevious, 
Ghost' s Goblins, Spindizzy, 
Camelot Warriors, Commando, 
Rambo, Pyjamarama, Bobby 


. . . . . . . . . . . . . . 


Cambio monitor fósforo 
verde GT-65 en buen estado 


. . . . . . . . . . . . . . 
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Todos los sábados, de 5 a 7 
de la tarde, en "Sábado Chip" , 
Dirigido por Antonio Rua, 
Presentado por José Luis 
Arriaza, hecho una 
computadora. Dedicado en 
cuerpo y alma al ordenador, 
y a la informática, Haciendo 
radio chip,.. estilo Cope. 
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Mercado 
COMLJN 


Cambiaría, vendería, 
compraría toda clase de 
programas para PCW 8256 y 
8512 (sólo con instrucciones), 
utilidades, gestión, 
compiladores, juegos, ,gran 
variedad, Contacto: Angel. Tel. 
(91) 274 47 07, 


. . . . . . . . . . . . . . 


Club Amstrad/Spectrum. 
Me gustaría contactar con otros 
clubes o particulares para el 
intercambio de programas y 
juegos, tenemos los últimos del 
mercado. Interesados llamar al 
tel. (91) 612 02 70, Alcorcón 
(Madrid). 


. . . . . . . . . . . . . . 


Por cambio de ordenador 
vendo: Amstrad 6128 (super 
cuidado), con: cables de 
impresora, cassette, 
separado res, filtro pantalla, 
fundas, 40 discos llenos de los 
mejores y últimos juegos y 
utilidades, 28 libros de Bibliotea. 
Básica de Informática y Gran 
Biblioteca Amstrad; todos los 
números de Amstrad User y 
Amstrad Acción; casi todos los 
números de Amstrad Semanal, 
especiales Micromanía, etc..,; 
manueles en castellano e 
instrucciones de los programas; 
libros: Guía del programador, 
CP/M. (Ed, Ra-ma), CPC 
464/6128, consejos y trucos, (Ed, 
Data Becker), CP/M. libro de 
f!iercicios. (Ed. Data Becker); 
libros sobre el Dbase 11 y el 
Wordstar. Joystick, Todo tan 
sólo 115,000 al contado, Llamar 
al tel. (91) 4749042 (horas de 
comidas y noches). 


. . . . . . . . . . . . . . 


Vendo Amstrad CPC 6128 
color, con un año de 
antigiiedad, incluyendo 
manuales, programas de cálculo 
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de estructuras, supercal, 
tratamiento de textos, Fortran, 
Turbo Pascal, dBase, Cabal y 
varios discos con juegos y 
diversas utilidades, Interesados 
llamar al tel. (91) 551 85 89, 


. . . . . . . . . . . . . . 


Desearía contactar con 
usuarios del Amstrad CPC 
464/472 para intercambiar 
juegos, Tengo más de 100, 
También me interesan todo tipo 
de copiones, Interesados escribir 
a Ricardo Bausá Llamazares. 
Herrero, 28, 5. o piso, puerta 
10, 12005 Castellón. Contestaré 
a todos, 


. . . . . . . . . . . . . . 


Vendo CP 664, lápiz óptico, 
joystick, libro de C/M, 
videojuego electrónico, y 
multitud de programas en cinta 
o disco, Todo en perfecto 
estado, Interesados llamar a 
Antonio Rubio tel. (924) 
24 31 60. Precio a convenir. 


. . . . . . . . . . . . . . 


Vendo digitalizador de vídeo 
VIDI de Rombo, para Amstrad 
CPC 6128, nuevo, con cables 
de conexión, por 25,000 
pesetas, Interesados llamar o 
escribir a: Jerónimo Pérez del 
Noval. Granada, 36, 3. o B. 
28007 Madrid. Tel. (91) 
551 65 85, 


. . . . . . . . . . . . . . 


Vendo Amstrad CPC 6128 
F. V., 30 discos con los mejores 
programas de mercado 
(Discology, Dr. Graph, Dr. 
Draw, Devpac, Oddjob, Placon, 
Cracker 11, Multiplán, dBase 
11, MS Cabal, MS Fortran, 
Pascal/Mt + , CBasic, MBas-ic, 
Art Studio, Tasword 128, Mini 
Office, etc..., y muchos juegos), 
Las colecciones casi completas 
de Amstrad User y AMSTRAD 
Semanal, y varios extras. Todo 
está en perfecto estado, Lo 
vendo junto o por separado. 
César Carrera González. Lope de 
Vega, 4, 1.0 izqda, 34001 


Palencia, Tel. (988) 74 66 48. 
(Por la tarde), 


. . . . . . . . . . . . . . 


Atención, compro, cambio 
y vendo todo tipo de 
programas para ordenadores 
Amstrad CPC, PWC 8256 y 
PC 1512, Tengo más de 100 
Juegos y programas, 
especialmente para CPC 464, 
472-664 y 6128. También tengo 
para PCW 8256 y para PC 
compatibles, Interesados escribiJ 
a: José Antonio Climent Monzó. 
Paseo de las Germanias, 39, 
Piso 3, o, Pta, 6, a, Gandía 
(Valencia), o llamar al tel. (96) 
286 01 41 todos los días de 9 a 
12 de la mañana, Prometo 
contestar a todos lo antes 
posible. 


. . . . . . . . . . . . . . 


Intercambio programas para 
PC 1512 y compatibles, No 
vendo ni compro, Mandar lista 
de programas a: Manuel Pérez 
Garrido. Pérez Medina, 42, 5. o 
B. 03007 Alicante, Tel. (965) 
12 34 15, 


. . . . . . . . . . . . . . 


Club Amstrad Manresa, 
Disponemos de más de 350 
programas, Tenemos todas las 
últimas novedades tanto de 
gestión como de juegos, 
Interesados escribir a: Jordi 
Mominó i de la Iglesia, Ctra, 
Santpedor, 80, 4, o. 08240 
Manresa (Barcelona) o bien 
llamar al tel. (93) 873 02 76. 


. . . . . . . . . . . . . . 


Intercambio programas para 
CPC 464, 664, 6128 de 
Amstrad con gente de Madrid 
capital. Tengo unos 50 
programas comerciales. Me 
interesaría conseguir un 
compilador Cabal para CPC 
464 en cinta y compro, por 
pérdida, instrucciones para el 
ensamblador desensamblador 
Gena3-Mona3. Interesados 
llamar al tel. 413 89 76, Carlos o 
escribir a Clavileno, 53, 28002 
Madrid, 
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¡NOS VAMOS DE VACACIONES! 
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Se acerca el mes de Agosto. La playa, el 
relax y muchas horas tranquilas nos esperan a 
todos. Amstrad Semanal también se hace 
eco del calort'lto, y durante el susodicho mes 
de Agosto te, dremos sólo un número: el 99. 
'Sin embargo, en Septiembre tendrán en su 
quiosco habitual el número 100 de Amstrad 
Semanal, En él celebramos nuestro segundo 
aniversario, y por ello ofrecemos un especial 
de 84 páginas repleto de actualidad, utilidades 
y sorpresas. 


Por ejemplo, hemos hecho lo imposible: 
cambiar los gráficos de una serie de juegos 


'I!." 


" 
n' - A-í 
h r r 
.4fI! 
.
 


.. 


" 


.. 
.. 


", ' ". 
,- .. tU 
,". .." 
. - .. . 
. ..- .. 
. . .-. 
. . 


-

..

 
"',-.;slltiii;: 


; '. 
." 


.... 


,a 
I 
. 
. 



' 


,. 


" 


que pegan y van a pegar muy duro, Así que el 
Amzy Moves, Game Over, Spirits, Cray 5, 
Barbarian y otros están modificados a nivel 
gráfico de tal manera que ni sus 11 opios' 
programadores los reconocerían, 


Por otra parte, se acabaron los errores al 
teclear listados en fonna de Datas. Nuestro 
programa estrella, el cargador universal, se 
encarga de ello. 


¡No se lo pierdan! 
El 1 de Septiembre, el número 100 
de Amstrad Semanal en su quiosco. 




 INFOBYTES 


Por todo 
lo ancho 


La particularidad del 
archivador de discos que os 
presentamos esta semana estriba 
en que no está condicionado a 
su utilización sobre mesas de 
trabajo de fondo largo, ya que 
para admitir los 40 discos que 
caben en su interior se ha 
recurrido a disponerlas en dos 
filas, lo que sin lugar a dudas se 
agradecerá más a la hora de 
acceder a ellos. 
Por su amplitud, permite 
colocar los discos tanto en 
posición apaisada como en 
vertical, aunque si se guardan 
los discos con su respectiva caja 
se deben mantener en esta 
última posición. 
Para agrupar los discos por 
temas, se dispone asimismo de 
varios separadores, que se 
insertarán sobre el fondo de la 
caja. 
Además, para no ser menos, 
también cuenta con una 
cerradura de seguridad que 
evitará que se pierdan ante la 
visita de amigos envidiosos. 
Su precio, es de 2.912 ptas. 
en Micro-1, CI Duque de Sesto, 
50, 28009 Madrid, tel.: (91) 
275 96 16, 
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Pequeña en dimensiones... 
. 
y precIo 


Así es la Brother M-ll09, 
una impresora pequeña en 
dimensiones y con un precio 
también muy reducido, pero, 
eso sí, manteniendo la misma 
calidad que caracteriza a la 
gama de impresoras Brother. 
Escribe con un ancho de 80 
caracteres por línea en letra tipo 
élite, igual que el resto de las 
impresoras de carro estrecho, 
pero para reducir sus 
d:.mensiones exteriores se han 


Atrápalos en una red 


U na red local de ordenadores 
consiste en un conjunto de éstos 
unidos entre sí a través de 
cables, permitiendo a todos ellos 
la utilización de los datos 
contenidos en un disco duro de 
un ordenador conocido como 
servidor de la red, así como 
compartir los mismos 
recursos, tales como una única 
impresora, plotter o un modem 
para las comunicaciones, 
U n buen ejemplo de todo esto 
lo tenemos en la red local 
CompNet, fabricada y 
desarrollada en nuestro país por 
Computer Technology de 
España para ordenadores PC 
compatibles y en particular para 
el Amstrad PC 1512, El 
CompNet utiliza un Sistema 
Operativo especial para la 
utilización en sistemas 
multiusuario, 
La red local requiere no sólo 


comprimido tanto los 
dispositivos electrónicos como 
los mecánicos, 
Cuenta con arrastre del papel 
tanto por fricción para hojas 
sueltas como por tracción para 
papel continuo. De esta forma, 
no hay problemas cuando se 
acabe una de las clases de papel. 
La encontraréis en RAM- 
ROM, CI Infantas, 21, 28004 
Madrid, te!.: (91) 522 79 78, al 
precio de 59.920 ptas. 


- 


el Sistema Operativo CompNet 
para el ordenador servidor, sino 
además una tarjeta especial 
Lana para cada uno de los 
ordenadores que componen la 
red. La red permite hasta 8 
servidores por red, y de 1 a 54 
estaciones conectadas a cada 
servidor. La distancia máxima 
permitida entre nodos es de 7 
km, comunicándose entre ellos a 
una increíble velocidad, 
La comunicación está 
soportada por cables de tipo 
coaxial, permitiendo la 
utilización de versiones 
multiusuario de las aplicaciones 
muy populares. 
El precio de cada tarjeta 
Lana es de 123,950 ptas, yel 
del sistema operativo en disco es 
de 274.400 ptas., y se encarga 
de su distribución CTE, CI 
Hernández Iglesia, 17, 28027 
Madrid, tel.: (91) 408 96 13, 


-/4 A,#STRAD ,
l'II/aI/a{ 



Música maestro 



' 


Una buena medida para 
aguantar el cansancio frente a 
tu ordenador Amstrad durante 
largas horas consiste en 
disponer el documento que se 
está utilizando tanto para copiar 
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como para transcribir en un 
procesador de textos a la altura 
de los ojos, consiguiendo con 
ello un menor movimiento de la 
cabeza. 
Para poner las cosas más 
fáciles aquí os presentamos este 
práctico atril que comercializa 
RAM-ROM, C/Infantas, 21- 
Tel.: (91) 522 7978, 28004 
Madrid, al precio de 2.240 
ptas. 
Consiste en un soporte para 
el documento sobre una especie 
de parrilla de varas entramadas, 
soportada por un pie rígido y 
moldeable que se aguanta sobre 
una pinza que muerde el 
canto de la mesa de 
trabajo, 
Gracias a ese pie, el atril 
adopta cualquier posición 
deseada por el usuario. 


Regla multiuso 


Dentro de la línea de 
productos Acco de procedencia 
inglesa que se venden en 
Master Computer, Plaza de 
Cristo Rey, 3, esquina a Cea 
Bermúdez, 28040 Madrid, tel.: 
(91) 2445936, podemos 
destacar esta práctica regla 
multifunción cuyo precio es de 
762 ptas, 
Su uso principal es ayudar al 
programador a realizar 
organigramas, herramienta 
indispensable para los amigos 
del orden y la programación 
estructurada, pero también nos 
puede valer como una sencilla 
regla graduada en centímetros, 
y además como tipómetro en la 
composición de textos escritos 
en impresora, 
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Los usuarios de los 
Amstrad PC 1512 seguro 
que habrán visto infinidad de 
veces en las cajas de sus 
discos que tienen un 
porcentaje libre de error del 
100 por 100, aunque en la 
práctica siempre cabe la 
posibilidad de encontrar 
alguno que tenga sectores 
defectuosos y de hecho 
alguna vez se presenta. 
Si esto ocurre, parte de la 
información contenida en el 
disco se puede dar por 
perdida. 
Polaroid, una marca que se 
distingue con fuerza en todos 
los campos donde participa, 
también lo hace en el terreno 
de los discos de 5 1/4, 
asegurando que sus discos 
son buenos no con el clásico 
rótulo de 100 por 100 libres 
de error, sino 
comprometiéndose a 
recuperar la información 
contenida en un disco en 
caso de defectos de 
fabricación, 
Se sirven tanto en cajas de 
cartón como de plástico, con 
diez discos en su interior al 
respectivo precio de 2.250 y 
2.500 ptas. en Comercial 
Nuevos Ministerios, en el 
vestíbulo central de la 
estación Renfe de Nuevos 
Ministerios, Tel.: (91) 
456 35 58, 
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Serie CPC 
. TECLADO' Teclado p
n, . 
74 t as en .!oques - Hasta 32 teclas 
programables - Teclado redefimble 
. PANTALLA' MonitorRGB verde (12") acolar (14") 
... Alta Res. Multicolor 
Col. xhneas _
 20x 25 
Colores ....IZB 
Juntos 320 x 200 640 x 200 160 x 200 
- Se pueden defimr hasta 8 ventanas de texto y 1 
de graficos. 
. SONIDO' 3 canales de 8 octavas modUladas 
mdependJentemente - Altavoz interne reC''''aDle- 
Sahda estéreo 
. BASIC . Locomotlve BASIC amplIado en ROM 
- Incluye los comandos AITER y EVERY para 
control de interrupciones 
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CI Aravaca, 22. 28040 Madrid, Te!. 459 30 01. Télex 47660 INSC E. Fax 4592292 
DELEGACIONES: 
Cataluña: C/Tarragona, 110. Te!. 4251111. 08015 Barcelona. Télex 93133 ACEE E, Fax 2418194 . Canarias: CI Alcalde Ramirez Bethencourt, 17, Te!. 


CPC 464 


UNIDAD CENTRAL MEMORIAS 
. Microprocesador 7J3OA - 64K RAM ampliables - 
32K ROM ampliables. __ 
. CASSETTE. Casse . . 
 Si ... con 


!JaéiOn (1 ó 2 KbaudlOs) 
controlada desde Basic 
. CONECTORES . Bus PCB multlUso, Unidad de 
Disco exterior paralelo Centronics, salida estéreo, 
joyShck, lápIz óptico, etc 
. SUMINISTRO' Ordenador con monitor verde 
o color - 8 cassettes con progr<lmas. Libro "Guía 
de ReferenCIa BASIC para el programador" - 
Manual en castellano - Garantía Oficial AMSTRAD 
ESPAÑA 
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59.900 Ptas. (monitor verde J 
90,900 Ptas. (monitor color
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rQ1te tu regalo! 
Al CI 
omprar tu CPC recuerda que hay 
, magníficos juegos y programas 
de regalo, i Llevátelos! . 
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. SUMINISTRO. Ordenador con monitor verde 
o color, DIsco con CP 1M 2.2 Y lenguaje DR LOGO 
Q¡m¡ co CP 1M Plus y utilidades - Disco con 6 
programas de omequio Man '2'"' "..:llano, 
Garantía Oficial AMSTRAD ESP ANA. 


..110... 


_ 84,900 Ptas. (monitor verde) 
119.900 Ptas. (monitor color) 


Te!. , 11 33, Télex 96496 TEIC E, 35004 Las Palmas de Gran Canaría e Levante-Murcia: CI Colón, 4 . 3 0 B. 46004 Valencia, Te!. 33481 00, Télex 64797 JAMI E. 
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PC 6128 


UNIDAD CINTa&. 'u 
. Microprocesador Z80A - 12: . '. " '. · et 
- 48 K ROM ampliables. 
. UNIDAD DE DISCO' Unidad incorporada 
para disco de 3" con 180K por cara 
. SISTEMAS OPERATIVOS' AMSDOS, CP/M 
22, CP/M Plus (30) 
. CONECTORES . Bus PCB multlUso, paralelo 
Centronics, cassette exterior, 2' Umdad de Disco, 
salida estéreo, joystick, lápiz óptico, etc. 
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Cualquier 
profesional que desee 
integrar un equipo iriformático en su 
sistema de trabaj
 acabará por caer en la 
tentación o la necesidad de un disco duro. 
El Segate puede ser una buena opción ante esta 
decisión de compra. 
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1 almacenamiento de datos supone 
E siempre la piedra angular de cualquier 
sistema informático, En el caso de que 
manejemos grandes volúmenes de éstos, o 
programas que por su dificultad exijan la 
utilización continua de discos, la necesidad de 
utilizar un disco duro, o fijo, que diría IBM, se 
hace incuestionable, 
En esta ocasión ha pasado uno de los modelos 
que existen en el mercado y que viene 
perfectamente preparado para ser montado 
directamente en un PC Amstrad, con la 
particularidad de que en el kit de montaje se 
incluye un ventilador que ayudará a mantener 
refrigerada la unidad central de su PC. 
Durante los días en que tuvimos montado el 
disco Segate sobre nuestro ordenador, el 
funcionamiento fue totalmente correcto, 
observándose una considerable disminución en los 
tiempos de acceso, Así, en algunas pruebas 
realizadas pudimos observar tiempos de 40 
segundos, para el caso del disco flexible, contra 30 
segundos en el caso del disco duro. 
La capacidad global del disco, punto clave junto 
a su tiempo de acceso, alcanza la cifra de 20 
megabytes, lo que supone un equivalente 
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aproximado de 60 discos flexibles de los que 
actualmente utiliza el Amstrad CPC. No obstante, 
esta comparación es engañosa, ya que no sólo 
tendremos la capacidad de estos 60 discos, sino 
que podremos soportar ficheros de una extensión 
superior a 360 K, límite para el caso de los floppy, 
aparte de poder trabajar con toda esta capacidad 
sin prácticamente ocuparnos de su orden y 
mantenimiento, 
La instalación de este disco duro es realmente 
sencilla, aunque usted siempre puede optar por 
que se lo monte su distribuidor si no está muy 
habituado al uso del destornillador, 
Lo primero que deberá hacer es desmontar la 
unidad central totalmente desconectada de la red, 
desatornillando los tornillos que se encuentran en 
la parte superior y los que sirven de sujeción a la 
unidad central. Después siga los pasos explicaaos 
en la secuencia de fotos y estamos convencidos de 
que no debe haber ningún problema 
La tarjeta controladora admite configuraciones 
distintas a la de un único disco duro de 20 megas, 
No obstante, el distribuidor sólo pudo facilitamos 
la información sobre ésta, Es probable, sólo 
probable, que ésta admita incluso el trabajo con 
otro disco duro o con otro periférico distinto, 
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Todo el kit suministrado por Sermicro: la tarjetn controladora, el 
ventilador, el soporte de la unidad, los dos conectadores y el disco 
duro, listos para ser montados. 
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En la parte izquierda será donde se ubique la unidad de disco. Allí 
fijaremos el soporte con el ventilador hacia abajo y el cable miran- 
do hacia la parte trasera. 
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El disco duro se fijará al soporte metálico, con la etiqueta hacia 
arriba, mediante tornillos, Después realizaremos las conexiones tal 
y como puede observarse en in fotografía. 
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En el caso de tener dos unidades de disco, deberá cambiar las car- 
cams metálicas, ya que la unidad A deberá quedar al lado derecho, 
al contrario de como viene instalada, 
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La conexión del ventilador se realiza a la toma de 12 voltios, si- 
tuada al fondo de la placa central, justo a la derecha de la salida 
de monitor El cable rojo deberá conectarse en la patilla derecha. 
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Para la configuración entregada, disco duro de 20 Megas, ha- 
brá que puentear en la posición W2, tal y como puede apre- 
Clarse. 
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Insertar la tarjeta en cualquiera de los slots libres, La única pre- 
caución que deberemos tomar es cogerla siempre por sus bordes, 
no tocando ni sus componentes ni sus pistas, 
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Ahora deberán conectarse los cables a la placa, Para ello debere- 
mos hacer coincidir laflecha grabada en el conector con la patilla 
1 marcada en la tarjeta, 


El 1!NC..1;at¡1 _1 di_es Sil cIINIhs. 


""bo ., -... lo ......UJ 


"",.. EX pn "'''''' . lIS 


"",.. EX .... "'''o.. .1 ..... * IDI!I.. 


Una vez montado y cerrado el equiPo, habrá que formatear y realizar la partición del disco, Para ello primero deberemos meter en 
la unidad A el sistema operativo y ejecutar el programa FDISK; lo usual es que destine todo el disco a MS-DOS. Ahora ya puede 
formatear su disco duro con la orden FORMAT C:/ S. A partir de este momento tiene todo el tiempo del mundo para intentar llenar 
sus 20 megas, 


aunque esto, insisto, entra tan sólo en el terreno 
de la hipótesis y es algo que nosotros no hemos 
podido comprobar. 
Para conseguir la configuración de 20 megas no 
hay que olvidar realizar el puente con los 
conmutadores previstos en la parte derecha de la 
placa, sobre la posición W2, El resto de los 
conmutadores puede dejados tal y como están, 
sólo con una patilla metida, o si lo prefiere, puede 
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La gran estrella del ktt: el ventilador que reduce la temperatura 
del propio disco duro, 


retirados, 
La conclusiones finales sobre el funcionamiento 
de este disco son verdaderamente buenas: alta 
capacidad y bajo tiempo de acceso, aunque se le 
puede achacar que en el caso de que usted decida 
montado por sí mismo, y a pesar de la sencillez 
de este pequeño bricolage, no encontrará en el kit 
ningún manual de instrucciones sobre este 
respecto, 
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FICHA TECNICA 
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Fabricante: 
Distribuye: 
Dirección: 
Precio del disco 
( con controlador): 
Precio del kit completo 
(incluye ventilador): 
Precio del montaje: 


Segate 
Sermicro 
Avda, Ramón y Cajal, 107 
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.... 
, 


... 
. - 


81.760 ptas. 


87.360 ptas. 
4.480 ptas. 
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